home *** CD-ROM | disk | FTP | other *** search
/ AmigActive 10 / AACD 10.iso / AACD / Resources / Sound / AHI / Install AHI < prev    next >
Text File  |  1998-10-25  |  79KB  |  2,674 lines
  1. ; $VER: AHI Install 4.15 (17.12.97)
  2. ; Description: Installer script for the AHI audio system (©1994-1998 Martin Blom).
  3. ; Done my Martin Blom, partly based on Teemu Suikki's install script.
  4. ; Public domain.
  5. ;
  6. ; $Id: Install\040AHI,v 4.16 1998/09/13 11:46:02 lcs Exp lcs $
  7. ; $Log: Install\040AHI,v $
  8. ; Revision 4.16  1998/09/13 11:46:02  lcs
  9. ; Added russion catalog.
  10. ;
  11. ; Revision 4.15  1997/12/17 19:43:54  lcs
  12. ; Added the language Magyar (Hungarian).
  13. ;
  14. ; Revision 4.14  1997/11/02 02:01:29  lcs
  15. ; Added Concierto.
  16. ;
  17. ; Revision 4.13  1997/10/09 01:08:49  lcs
  18. ; Added the language Hrvatski.
  19. ;
  20. ; Revision 4.12  1997/09/28 04:36:32  lcs
  21. ; Added Maestro Pro
  22. ;
  23.  
  24. (set #complete 0)
  25. (set #completeadd (/ 1000 35))    ; There are 35 complete statements!
  26.  
  27. (complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
  28.  
  29. (set #osversion (/ (getversion "exec.library" (resident)) 65536))
  30.  
  31. ;**
  32. ;** All the strings
  33. ;**
  34.  
  35.     (set #t_welcome        (cat
  36.         " Welcome to the AHI installation. AHI is a retargetable"
  37.         " audio systems that can be used with both the built-in"
  38.         " sound chip (Paula) and several sound cards. This is version"
  39.         " 4."
  40.     ))
  41.     (set #t_oldinstaller    (cat
  42.         " You have an old version of the Installer. I'll probably"
  43.         " need version 43.3 or greater. You can continue anyway"
  44.         " but there is no guarantee it will work as it's supposed"
  45.         " to do.\n"
  46.         " Do you wish to continue anyway?"
  47.     ))
  48.     (set #t_oldinstallerhelp (cat
  49.         " The version of Installer you use is too old. You can"
  50.         " find a more recent version on the Internet, for example"
  51.         " on Aminet, in the util/misc directory. The current"
  52.         " file name is \"Installer-43_3.lha\":\n"
  53.         " <URL:ftp://ftp.germany.aminet.org/pub/aminet/util/misc/Installer-43_3.lha"
  54.     
  55.     ))
  56.     (set #t_installaborted    "Installation aborted.")
  57.  
  58.     (set #t_installing    "Installing ")
  59.     (set #t_installingdocs    "Installing developer documentation")
  60.     (set #t_installingincs    "Installing include files")
  61.     (set #t_installingsrc    "Installing example source code")
  62.     (set #t_nofiles        "No files to install.")
  63.  
  64.     (set #t_nohelp        "No help available.")
  65.  
  66.     (set #t_parts        "Which parts of AHI do you wish to install?")
  67.     (set #t_system        "System files")
  68.     (set #t_prefs        "Preferences program")
  69.     (set #t_audio        "The AUDIO handler");
  70.     (set #t_userdoc        "User's documentation")
  71.     (set #t_a-developer    "Application developer files")
  72.     (set #t_d-developer    "Driver developer files")
  73.     (set #t_userhelp    (cat
  74.         "System files:\n"
  75.         " The system files. This is the heart of AHI and must be"
  76.         " if for any of the other components to work.\n\n"
  77.         "Preferences program:\n"
  78.         " The preference program. Can be used to change many options"
  79.         " in AHI. This part of AHI requires BGUI or MUI to be installed.\n\n"
  80.         "The AUDIO handler:\n"
  81.         " Allows you to play and record samples with the 'copy'"
  82.         " command.\n\n"
  83.         "User's documentation:\n"
  84.         " An AmigaGuide® file descibing the AHI audio system and"
  85.         " its components.\n\n"
  86.     ))
  87.     (set #t_devhelp        (cat
  88.         "Application developer files:\n"
  89.         " Autodocs, include files, example source code etc."
  90.         " Required if you wish to use AHI in your own applications.\n\n"
  91.         "Driver developer files:\n"
  92.         " Autodocs, example source code etc. Only required"
  93.         " if you plan to write hardware drivers for sound"
  94.         " cards.\n\n"
  95.     ))
  96.  
  97.     (set #t_gui        (cat
  98.         " Which version of the preferences program would you like"
  99.         " to install?"
  100.     ))
  101.     (set #t_guihelp        (cat
  102.         " Please select which GUI system you prefer.\n\n"
  103.     ))
  104.     (set #t_guibgui        "BGUI version")
  105.     (set #t_guimui        "MUI version")
  106.  
  107.     (set #t_icon         "Which icon do you want to install?")
  108.     (set #t_iconstd        "Plain 4 colour icon")
  109.     (set #t_iconmwb        "8 colour MagicWB icon")
  110.     (set #t_iconhelp    (cat
  111.         " Select which icon you would like to use for the prefernces"
  112.         " program. The MagicWB icon was designed by Erol Ismael.\n\n"
  113.     ))
  114.  
  115.     (set #t_languages    (cat
  116.         "Which languages do you want to install?"
  117.         " The built-in language is English."))
  118.     (set #t_languageshelp    (cat
  119.         " If your language is not in the list, the author of AHI"
  120.         " would be very happy if you made a translation. Edit the files"
  121.         " User/Catalogs/ahi.ct and User/Catalogs/ahiprefs.ct"
  122.         " and send it to this address:\n"
  123.         " lcs@lysator.liu.se\n"
  124.         " It may be a wise move to ask first, just to make sure nobody"
  125.         " else is working on a translation to your language.\n\n"
  126.     ))
  127.  
  128.     (set #t_drivers        (cat
  129.         "Which AHI drivers you want to install?"
  130.         " Do not install drivers for sound cards you don't have."))
  131.     (set #t_drivershelp    (cat
  132.         "Concierto:\n"
  133.         " Concierto sound card.\n\n"
  134.         "Delfina:\n"
  135.         " Delfina Classic/Lite sound card.\n\n"
  136.         "Filesave:\n"
  137.         " Read/Write sample data to a file.\n\n"
  138.         "Maestro Pro:\n"
  139.         " Maestro Pro sound card.\n\n"
  140.         "Melody Z2:\n"
  141.         " Melody Z2 sound card.\n\n"
  142.         "Melody 1200:\n"
  143.         " Melody 1200 sound card.\n\n"
  144.         "Paula:\n"
  145.         " Regular Amiga sound hardware.\n\n"
  146.         "Prelude:\n"
  147.         " Prelude sound card.\n\n"
  148.         "Toccata:\n"
  149.         " Toccata sound card.\n\n"
  150.         "Wavetools:\n"
  151.         " Wavetools sound card.\n\n"
  152.     ))
  153.  
  154.     (set #t_CPUver        "Which version of the binaries do you wish to install?")
  155.     (set #t_CPUverhelp    (cat
  156.         " 68020-optimized binaries are much faster, and often also"
  157.         " smaller than plain 68000 versions. In the case of AHI,"
  158.         " the 68000 versions have less features and reduced sound"
  159.         " quality. It is strongly suggested that you use the"
  160.         " 68020 versions of the binaries.\n"
  161.                 " The 68060 version avoids the slow 64 bit divisions. Don't"
  162.                 " install this version unless you own a 68060 CPU!\n\n"
  163.     ))
  164.  
  165.     (set #t_devfiles    "Which developer files do you wish to install?")
  166.     (set #t_devdocs        "Autodocs and AHI Developer's Guide")
  167.     (set #t_source        "Example source code")
  168.     (set #t_asm        "Assembler include files")
  169.     (set #t_cgen        "Generic C include files")
  170.     (set #t_e        "E module files")
  171.     (set #t_fd        "FD files")
  172.     (set #t_gg        "Extra GeekGadgets gcc include files")
  173.     (set #t_sas        "Extra SAS/C (and DICE) include files")
  174.     (set #t_storm        "Extra StormC include files")
  175.     (set #t_devfileshelp    (cat
  176.         "Autodocs and AHI Developer's Guide:\n"
  177.         " The autodocs and rules for programming AHI.\n\n"
  178.         "Example source code:\n"
  179.         " Some example programs, most of them are written in C, but"
  180.         " there are some assembler sources too.\n\n"
  181.         "Assembler include files:\n"
  182.         " Include files needed if you program in assembler.\n\n"
  183.         "Generic C include files:\n"
  184.         " Include files needed if you program in C.\n\n"
  185.         "E module files:\n"
  186.         " The module files to use with AmigaE.\n\n"
  187.         "FD files:\n"
  188.         " Can be used with the 'lvo' tool, or when you build a"
  189.         " hardware driver written in C.\n\n"
  190.         "Extra GeekGadgets gcc include files:\n"
  191.         " The special include files for gcc (inline, proto etc).\n\n" 
  192.         "Extra SAS/C (and DICE) include files:\n"
  193.         " The special include files for SAS/C (pragmas, proto etc)."
  194.         " They work with DCC too, but with no tag calls.\n\n"
  195.         "Extra StormC include files:\n"
  196.         " The special include files for StormC (pragma, proto etc).\n\n"
  197.     ))
  198.  
  199.  
  200.     (set #t_nodevs
  201.         "Cannot find the Devs: assign. Try a higher userlevel instead.")
  202.     (set #t_noc
  203.         "Cannot find the C: assign. Try a higher userlevel instead.")
  204.     (set #t_noprefs
  205.         "Cannot find the Sys:Prefs directory. Try a higher userlevel instead.")
  206.     (set #t_nol
  207.         "Cannot find the L: assign. Try a higher userlevel instead.")
  208.     (set #t_devspath    "Where do you want to install the system files?")
  209.     (set #t_devspathhelp    (cat
  210.         " The directory you select must be a part of your Devs: assign."
  211.         " The installer will copy ahi.device, the hardware drivers"
  212.         " and the audio mode description files to this directory."
  213.         " Subdirectories for the drivers and mode files will be"
  214.         " created.\n\n"
  215.     ))
  216.     (set #t_cpath        "Where do you want to install AddAudioModes?")
  217.     (set #t_cpathhelp    (cat
  218.         " AddAudioModes is a small command line utility that can"
  219.         " be used to manipulate the database which contains the"
  220.         " audio modes (much like the screenmode database)."
  221.         " CLI programs are normally located in the C: directory.\n\n"
  222.     ))
  223.  
  224.  
  225.     (set #t_localepath    "Where do you want to install the catalogs?")
  226.     (set #t_localepathhelp    (cat
  227.         " The directory you select must be a part of your Locale: assign."
  228.         " The installer will copy the catalogs you have selected to"
  229.         " subdirectories in this directory.\n\n"
  230.     ))
  231.  
  232.     (set #t_prefspath    "Where do you want to install the preferences program?")
  233.     (set #t_prefspathhelp    (cat
  234.         " The preferences program lets you configure AHI for your particular"
  235.         " configuration. You can select which sound hardware you prefer"
  236.         " to use, which physical inputs and outputs you wish to use"
  237.         " etc. Preferences programs are normally located in the"
  238.         " Sys:Prefs/ directory.\n"
  239.         " This program requires BGUI or MUI, depending on which version"
  240.         " you are installing.\n\n"
  241.     ))
  242.  
  243.     (set #t_audiohelp    (cat
  244.         " The AUDIO handler is used to mount a device called AUDIO:. By"
  245.         " copying files to and from this device, you can play and record"
  246.         " raw sample data, IFF-AIFF or IFF-AIFC files.\n\n"
  247.     ))
  248.  
  249.     (set #t_lpath        "Where do you want to install the AUDIO handler?")
  250.     (set #t_lpathhelp    (cat
  251.         #t_audiohelp
  252.         " Handlers are normally located in the L: directory.\n\n"
  253.     ))
  254.  
  255.     (set #t_dosdevpath    "Where do you want to install the AUDIO mount entry?")
  256.     (set #t_dosdevpathhelp    (cat
  257.         #t_audiohelp
  258.         " Mount entries are normally located in the Devs:DOSDrivers"
  259.         " directory if they are to be mounted at boot time. If not, they"
  260.         " probably are in the SYS:Storage/DOSDrivers directory.\n\n"
  261.     ))
  262.  
  263.     (set #t_dosdriver    "Do you want the handler to be activated at boot time?")
  264.     (set #t_dosdriverhelp    (cat
  265.         " If you want, the AUDIO: device can be made avaliable as soon as"
  266.         " your system has been started. This saves you the effort of"
  267.         " having to mount it manually when you want to use it. It does"
  268.         " not require much memory to mount the device and it is therefor"
  269.         " suggested that you select 'Yes'.\n\n"
  270.     ))
  271.  
  272.     (set #t_userdocpath    "Where do you want to install the user documentation?")
  273.     (set #t_userdocpathhelp    (cat
  274.         " This is an AmigaGuide® file descibing the AHI audio system"
  275.         " and its components.\n\n"
  276.     ))
  277.  
  278.     (set #t_srcpath        (cat
  279.         " Where do you want to install the example source code?"
  280.         " A directory called AHI will be created there."
  281.     ))
  282.     (set #t_srcpathhelp    (cat
  283.         " The example sources, in both C and assembler, will be"
  284.         " stored in a subdirectory called AHI. Any files currently"
  285.         " present in the AHI directory will be deleted!\n\n"
  286.     ))
  287.     (set #t_oldsrc        (cat
  288.         " There is already a directory called AHI here."
  289.         " All files in it will be deleted."
  290.     ))
  291.  
  292.     (set #t_devdocspath    " Where do you want to store the developer documentation?")
  293.     (set #t_devdocspathhelp    (cat
  294.         " The installer will place the autodoc files and the"
  295.         " AHI Developer's Guide in the directory you select.\n\n"
  296.     ))
  297.  
  298.     (set #t_aincpath    " Where are your assembler include files located?")
  299.     (set #t_aincpathhelp    (cat
  300.         " The installer will place the assembler include files"
  301.         " in subdirectories (lvo, devices and libraries)"
  302.         " of the one you select.\n\n"
  303.     ))
  304.  
  305.     (set #t_fdpath        " Where do you keep your FD-files?")
  306.     (set #t_fdpathhelp    (cat
  307.         " FD-files are files describing a library's or a device's"
  308.         " functions. They can be used with the 'lvo' program, and"
  309.         " can also be useful if you write hardware drivers.\n\n"
  310.     ))
  311.  
  312.     (set #t_cincpath    " Where are your C include files located?")
  313.     (set #t_cincpathhelp    (cat
  314.         " The installer will place the generic C include files"
  315.         " in subdirectories (clib, devices and libraries)"
  316.         " of the one you select.\n\n"
  317.     ))
  318.  
  319.     (set #t_emodpath    " Where are your E module files located?")
  320.     (set #t_emodpathhhelp    (cat
  321.         " The installer will place the E module files in the directory"
  322.         " and in subdirectories (devices and libraries)"
  323.         " of the one you select.\n\n"
  324.     ))
  325.  
  326.     (set #t_ggincpath    " Where do you want to place the GeekGadgets gcc include files?")
  327.     (set #t_ggincpathhelp    (cat
  328.         " gcc needs some extra files to find out which registers"
  329.         " to use when calling AHI functions. That information is"
  330.         " located in these files, which will be copied to the"
  331.         " inline, pragmas and proto directories.\n\n"
  332.     ))
  333.  
  334.     (set #t_sasincpath    " Where do you want to place the SAS/C (and DICE) include files?")
  335.     (set #t_sasincpathhelp    (cat
  336.         " SAS/C (and DICE) needs some extra files to find out which registers"
  337.         " to use when calling AHI functions. That information is"
  338.         " located in these files, which will be copied to the"
  339.         " pragmas and proto directories.\n\n"
  340.     ))
  341.  
  342.     (set #t_stormincpath    " Where do you want to place the StormC include files?")
  343.     (set #t_stormincpathhelp (cat
  344.         " StormC needs some extra files to find out which registers"
  345.         " to use when calling AHI functions. That information is"
  346.         " located in these files, which will be copied to the"
  347.         " pragma and proto directories.\n\n"
  348.     ))
  349.  
  350.     (set #t_ahidevhelp    (cat
  351.         " ahi.device is the heart of the AHI"
  352.         " audio system. This is the only part"
  353.         " that other programs knows anything about.\n\n"
  354.     ))
  355.  
  356.     (set #t_runaddmodes    (cat
  357.         " About to run AddAudioModes to recreate"
  358.         " the audio modes database."
  359.     ))
  360.  
  361.  
  362.     (set #t_overwritemode1
  363.         " There is already a copy of the audio mode descriptor ")
  364.     (set #t_overwritemode2 " present in ")
  365.     (set #t_overwritemode3    (cat
  366.         ".\n\n"
  367.         " Do you want to overwrite it?"
  368.         " All changes you have done to to it will be lost!"
  369.     ))
  370.  
  371.  
  372. (if (= @language "srpski")
  373. (    ; Translated by Ljubomir Jankovic <lurch@afrodita.rcub.bg.ac.yu>
  374.     (set #t_welcome        (cat
  375.         " Dobrodoãli u AHI instalaciju. AHI je retargetable"
  376.         " audio sistem koji moäe biti koriãáen sa ugraâenim"
  377.         " zvuànim àipom (Paula) i viãe zvuànih kartica."
  378.         " Ovo je verzija 4."
  379.     ))
  380.     (set #t_oldinstaller    (cat
  381.         " Vi imate staru verziju Installer-a. Verovatno áe mi"
  382.         " trebati verzija 43.3 ili viãa. Moäete nastaviti, ali"
  383.         " nema garancije da áe sve raditi kako je predviâeno.\n"
  384.         " Da li stvarno äelite da nastavite?"
  385.     ))
  386.     (set #t_oldinstallerhelp (cat
  387.         " Verzija Installer-a koju koristite previãe stara. Moäete"
  388.         " naái najnoviju verziju na Internetu, na primer"
  389.         " na Aminet-u, u direktorijumu util/misc. Trenutno ime"
  390.         " fajla je \"Installer-43_3.lha\":\n"
  391.         " <URL:ftp://ftp.germany.aminet.org/pub/aminet/util/misc/Installer-43_3.lha"
  392.  
  393.     ))
  394.     (set #t_installaborted    "Instalacija prekinuta.")
  395.  
  396.     (set #t_installing    "Instaliram ")
  397.     (set #t_installingdocs    "Instaliram dokumentaciju za programere")
  398.     (set #t_installingincs    "Instaliram include fajlove")
  399.     (set #t_installingsrc    "Instaliram primere izvornog koda")
  400.     (set #t_nofiles        "Nema fajlova za instaliranje.")
  401.  
  402.     (set #t_nohelp        "Pomoá nije dostupna.")
  403.  
  404.     (set #t_parts        "Koje delove AHI-ja äelite de instalirate?")
  405.     (set #t_system        "Sistemske fajlove")
  406.     (set #t_prefs        "Program za podeãavanja")
  407.     (set #t_audio        "AUDIO hendler");
  408.     (set #t_userdoc        "Korisniàka dokumentacija")
  409.     (set #t_a-developer    "Fajlovi za razvoj aplikacija")
  410.     (set #t_d-developer    "Fajlovi za razvoj drajvera")
  411.     (set #t_userhelp    (cat
  412.         "Sistemski fajlovi:\n"
  413.         " Ovo je srce AHI-ja i mora postojati"
  414.         " da bi radile ostale komponente.\n\n"
  415.         "Program za podeãavanja:\n"
  416.         " Moäe se koristiti za podeãavanje mnogih opcija"
  417.         " AHI-ja. Ovaj deo AHI-ja zahteva da se instalira BGUI.\n\n"
  418.         "AUDIO hendler:\n"
  419.         " Omoguáava Vam da puãtate i snimate semplove komandom"
  420.         " 'copy'.\n\n"
  421.         "Korisniàka dokumentacija:\n"
  422.         " AmigaGuide® fajl koji opisuje AHI audio sistem i"
  423.         " njegove komponente.\n\n"
  424.     ))
  425.     (set #t_devhelp        (cat
  426.         "Fajlovi za razvoj aplikacija:\n"
  427.         " Autodokovi, include fajlovi, primeri izvornog koda itd."
  428.         " Oni su neophodni ako äelite da koritite AHI u svoji aplikacijama.\n\n"
  429.         "Fajlovi za razvoj drajvera:\n"
  430.         " Autodokovi, primeri izvornog koda itd. Potrebni su"
  431.         " samo ako planirate da razvijate hardverske drajvere za"
  432.         " zvuàne kartice.\n\n"
  433.     ))
  434.  
  435.  
  436.     (set #t_languages    (cat
  437.         "Koje jezike äelite da instalirate?"
  438.         " Ugraâeni jezik je Engleski."))
  439.     (set #t_languageshelp    (cat
  440.         " Ako se Vaã jezik ne nalazi na listi, autor AHI-ja"
  441.         " bi bio veoma sreáan, ako bi napravili prevod. Promenite fajlove"
  442.         " User/Catalogs/NewCatalog.ct i User/Catalogs/NewPrefsCatalog.ct"
  443.         " i poãaljite na ovu adresu:\n"
  444.         " lcs@lysator.liu.se\n\n"
  445.     ))
  446.  
  447.     (set #t_drivers        (cat
  448.         "Koje AHI drajvere äelite da instalirate?"
  449.         " Najbolje je da instalirate samo drajvere koji su Vam potrebni."))
  450.     (set #t_drivershelp    (cat
  451.         "Concierto:\n"
  452.         " Concierto zvuàna kartica.\n\n"
  453.         "Delfina:\n"
  454.         " Delfina Classic/Lite zvuàna kartica.\n\n"
  455.         "Filesave:\n"
  456.         " Àitanje/zapis zvuànih podataka u fajl.\n\n"
  457.         "Maestro Pro:\n"
  458.         " Maestro Pro zvuàna kartica.\n\n"
  459.         "Melody Z2:\n"
  460.         " Melody Z2 zvuàna kartica.\n\n"
  461.         "Melody 1200:\n"
  462.         " Melody 1200 zvuàna kartica.\n\n"
  463.         "Paula:\n"
  464.         " Obiàan Amigin zvuàni hardver.\n\n"
  465.         "Prelude:\n"
  466.         " Prelude zvuàna kartica.\n\n"
  467.         "Toccata:\n"
  468.         " Toccata zvuàna kartica.\n\n"
  469.         "Wavetools:\n"
  470.         " Wavetools zvuàna kartica.\n\n"
  471.     ))
  472.     (set #t_CPUver        "Koju verziju programskih fajlova äelite da instalirate?")
  473.     (set #t_CPUverhelp    (cat
  474.         " Fajlovi optimizovani za 68020 su bräi, i obiàno"
  475.         " manji nego njihove 68000 verzije. U sluàaju AHI-ja,"
  476.         " verzije za 68000 imaju manje moguánosti i smanjen"
  477.         " kvalitet zvuka. Zaista Vam preporuàujem da instalirate"
  478.         " verzije fajlova za 68020.\n"
  479.         " Verzija za 68060 izbegava sporo 64-vorobitno deljenje. Nemojte"
  480.         " instalirati ovu verziju ako nemate 68060 procesor!\n\n"
  481.     ))
  482.  
  483.     (set #t_devfiles    "Koje programerske fajlove äelite da instalirate?")
  484.     (set #t_devdocs        "Autodokove i AHI Vodià za programere")
  485.     (set #t_source        "Primeri izvornog koda")
  486.     (set #t_asm        "Include fajlove za asembler")
  487.     (set #t_cgen        "Opãte include fajlove za C")
  488.     (set #t_e        "E module")
  489.     (set #t_fd        "FD fajlove")
  490.     (set #t_gg        "Dodatne GeekGadgets gcc include fajlove")
  491.     (set #t_sas        "Dodatne SAS/C (i DICE) include fajlove")
  492.     (set #t_storm        "Dodatne StormC include fajlove")
  493.     (set #t_devfileshelp    (cat
  494.         "Autodokovi i AHI Vodià za programere:\n"
  495.         " Autodokovi i pravila za programiranje AHI-ja.\n\n"
  496.         "Primeri izvornog koda:\n"
  497.         " Neki programi za primer, veáina napisan u C-u, ali ima"
  498.         " i neãto izvornog koda u asembleru.\n\n"
  499.         "Include fajlovi za asembler:\n"
  500.         " Include fajlovi koji su potrebni ako programirate u asembleru.\n\n"
  501.         "Opãti include fajlovi za C:\n"
  502.         " Include fajlovi koji su potrebni ako programirate u C-u.\n\n"
  503.         "E moduli:\n"
  504.         " Moduli za koriãáenje u Amiga E-u.\n\n"
  505.         "FD fajlovi:\n"
  506.         " Mogu se koristiti sa programom 'lvo', ili kada pravite"
  507.         " hardverski drajver napisan u C-u.\n\n"
  508.         "Dodatni GeekGadgets gcc include fajlovi:\n"
  509.         " Specijalni include fajlovi za gcc (inline, proto itd.).\n\n"
  510.         "Dodatni SAS/C (i DICE) include fajlovi:\n"
  511.         " Specijalni include fajlovi za SAS/C (pragma, proto itd.)."
  512.         " Rade i sa DCC-om, ali bez poziva tag-ova.\n\n"
  513.         "Dodatni StormC include fajlovi:\n"
  514.         " Specijalni include fajlovi za StormC (pragma, proto itd.).\n\n"
  515.     ))
  516.  
  517.  
  518.     (set #t_nodevs
  519.         "Ne mogu da naâem Devs: asajn. Pokuãajte viãi korisniàki nivo.")
  520.     (set #t_noc
  521.         "Ne mogu da naâem C: asajn. Pokuãajte viãi korisniàki nivo.")
  522.     (set #t_noprefs
  523.         "Ne mogu da naâem Sys:Prefs directory. Pokuãajte viãi korisniàki nivo.")
  524.     (set #t_nol
  525.         "Ne mogu da naâem L: asajn. Pokuãajte viãi korisniàki nivo.")
  526.     (set #t_devspath    "Gde äelite da instalirate sistemske fajlove?")
  527.     (set #t_devspathhelp    (cat
  528.         " Direktorijum koji odaberete mora biti deo Vaãeg Devs: asajna."
  529.         " Installer áe kopirati ahi.device, hardverske drajvere"
  530.         " i fajlove sa opisima audio modova u ovaj direktorijum."
  531.         " Poddirektorijumi za drajvere i fajlove sa opisima modova"
  532.         " áe biti napravljeni.\n\n"
  533.     ))
  534.     (set #t_cpath        "Gde äelite da instalirate AddAudioModes?")
  535.     (set #t_cpathhelp    (cat
  536.         " AddAudioModes je mali CLI program koji se moäe koristiti"
  537.         " za manipulaciju baze podataka koja sadräi audio modove"
  538.         " (vrlo sliàno bazi podataka sa moguáim rezolucijama ekrana)."
  539.         " CLI programi se obiàno nalaze u C: direktorijumu.\n\n"
  540.     ))
  541.  
  542.  
  543.     (set #t_localepath    "Gde äelite da instalirate kataloge?")
  544.     (set #t_localepathhelp    (cat
  545.         " Direktorijum koji odaberete mora biti deo Locale: asajna."
  546.         " Installer áe kopirati kataloge koje odaberete u"
  547.         " poddirektorijume u ovom direktorijumu.\n\n"
  548.     ))
  549.  
  550.     (set #t_prefspath    "Gde äelite da instalirate program za podeãavanja?")
  551.     (set #t_prefspathhelp    (cat
  552.         " Program za podeãavanja Vam omoguáava da podesite AHI vaãoj"
  553.         " konkretnoj konfiguraciji. Moäete odabrati koji zvuàni hardver"
  554.         " äelite da koristite, koje fiziàke ulaze i izlaze äelite da"
  555.         " koritite itd. Programi za podeãavanja se obiàno nalaze u"
  556.         " Sys:Prefs/ direktorijumu.\n"
  557.         " Ovaj program zahteva BGUI biblioteku.\n\n"
  558.     ))
  559.  
  560.     (set #t_audiohelp    (cat
  561.         " AUDIO hendler se koristi za mount-ovanje AUDIO: ureâaja. Kopirajuái"
  562.         " fajlove na i sa ureâaja, moäete puãtati i snimati sirove zvuàne"
  563.         " podatke, IFF-AIFF ili IFF-AIFC fajlove.\n\n"
  564.     ))
  565.  
  566.     (set #t_lpath        "Gde äelite da instalirate AUDIO hendler?")
  567.     (set #t_lpathhelp    (cat
  568.         #t_audiohelp
  569.         " Hendleri se obiàno nalaze u L: direktorijumu.\n\n"
  570.     ))
  571.  
  572.     (set #t_dosdevpath    "Gde äelite da instalirate fajl za mount-ovanje AUDIO hendlera?")
  573.     (set #t_dosdevpathhelp    (cat
  574.         #t_audiohelp
  575.         " Mount fajlovi se nalaze u direktorijumu Devs:DOSDrivers"
  576.         " ako treba da se mount-uju pri dizanju sistema. Ako ne, onda"
  577.         " se verovatno nalaze u SYS:Storage/DOSDrivers direktorijumu.\n\n"
  578.     ))
  579.  
  580.     (set #t_dosdriver    "Da li äelite da hendler bude instaliran pri dizanju sistema?")
  581.     (set #t_dosdriverhelp    (cat
  582.         " Ako äelite, AUDIO: ureâaj moäe biti dostupan àim se digne sistem."
  583.         " Ovo vam omoguáava da ne morate da mount-ujete ureâaj svaki put"
  584.         " kada äelite da ga koristite. Ureâaj ne zahteva mnogo memorije"
  585.         " i zato preporuàujem da da odaberete 'Da'.\n\n"
  586.     ))
  587.  
  588.     (set #t_userdocpath    "Gde äelite da instalirate korisniàku dokumentaciju?")
  589.     (set #t_userdocpathhelp    (cat
  590.         " Ovo je AmigaGuide® fajl koji opisuje AHI audio sistem"
  591.         " i njegove komponente.\n\n"
  592.     ))
  593.  
  594.     (set #t_srcpath        (cat
  595.         " Gde äelite da instalirate primere izvornog koda?"
  596.         " Direktorijum sa imenom AHI biáe napravljen tamo."
  597.     ))
  598.     (set #t_srcpathhelp    (cat
  599.         " Primeri izvornog koda, i u C-u i asembleru, áe biti"
  600.         " stavljeni u poddirektorijum imena AHI. Svi fajlovi koji"
  601.         " se nalaze u AHI direktorijumu áe biti obrisani!\n\n"
  602.     ))
  603.     (set #t_oldsrc        (cat
  604.         " Ovde veá postoji direktorijum imena AHI."
  605.         " Svi fajlovi u njemu áe biti obrisani."
  606.     ))
  607.  
  608.     (set #t_devdocspath    " Gde äelite da stavite dokumentaciju za programere?")
  609.     (set #t_devdocspathhelp    (cat
  610.         " Installer áe staviti autodok fajlove i dokumentaciju za"
  611.         " razvoj AHI-ja direktorijum koji odaberete.\n\n"
  612.     ))
  613.  
  614.     (set #t_aincpath    " Gde se nalaze Vaãi include fajlovi za asembler?")
  615.     (set #t_aincpathhelp    (cat
  616.         " Installer áe smestiti include fajlove za asembler"
  617.         " u poddirektorijume (lvo, devices i libraries)"
  618.         " direktorijuma koji odaberete.\n\n"
  619.     ))
  620.  
  621.     (set #t_fdpath        " Gde dräite Vaãe FD fajlove?")
  622.     (set #t_fdpathhelp    (cat
  623.         " FD fajlovi su fajlovi koji opisuju funkcije biblioteke"
  624.         " i ureâaja. Mogu se koristiti sa programom 'lvo', i"
  625.         " i mogu biti korisni ako piãete hardverske drajvere.\n\n"
  626.     ))
  627.  
  628.     (set #t_cincpath    " Gde se nalaze Vaãi C include fajlovi?")
  629.     (set #t_cincpathhelp    (cat
  630.         " Installer áe smestiti opãte include fajlove za C"
  631.         " u poddirektorijume (clib, devices i libraries)"
  632.         " direktorijuma koji odaberete.\n\n"
  633.     ))
  634.  
  635.     (set #t_emodpath    "  Gde se nalaze Vaãi E modul fajlovi?")
  636.     (set #t_emodpathhhelp    (cat
  637.         " Installer áe smestiti E modul fajlove u direktorijum"
  638.         " i poddirektorijume (devices i libraries)"
  639.         " direktorijuma koji odaberete.\n\n"
  640.     ))
  641.  
  642.     (set #t_ggincpath    " Gde äelite da smestite GeekGadgets gcc include fajlove?")
  643.     (set #t_ggincpathhelp    (cat
  644.         " gcc-u trebaju neki dodatni fajlovi da bi naãao koje registre"
  645.         " da koristi pri pozivu AHI funkcija. Te informacije se nalaze"
  646.         " u ovim fajlovima, koji áe biti kopirani u direktorijume "
  647.         " inline, pragmas i proto.\n\n"
  648.     ))
  649.  
  650.     (set #t_sasincpath    " Gde äelite da smestite SAS/C (i DICE) include fajlove?")
  651.     (set #t_sasincpathhelp    (cat
  652.         " SAS/C-u (i DICE-u) trebaju neki dodatni fajlovi da bi naãao"
  653.         " koje registre da koristi pri pozivu AHI funkcija. Te informacije"
  654.         " se nalaze u ovim fajlovima, koji áe biti kopirani u pragmas"
  655.         " i proto direktorijume.\n\n"
  656.     ))
  657.  
  658.     (set #t_stormincpath    " Gde äelite da smestite StormC include fajlove?")
  659.     (set #t_stormincpathhelp (cat
  660.         " StormC-u neki dodatni fajlovi da bi naãao koje registre"
  661.         " da koristi pri pozivu AHI funkcija. Te informacije se nalaze"
  662.         " u ovim fajlovima, koji áe biti kopirani u pragma i proto"
  663.         " direktorijume.\n\n"
  664.     ))
  665.  
  666.     (set #t_ahidevhelp    (cat
  667.         " ahi.device je srce AHI audio"
  668.         " sistema. Ovo je jedini deo za koga"
  669.         " drugi programi znaju.\n\n"
  670.     ))
  671.  
  672.     (set #t_runaddmodes    (cat
  673.         " Upravo startujem AddAudioModes da bih"
  674.         " osveäio bazu audio modova."
  675.     ))
  676.  
  677.  
  678.     (set #t_overwritemode1
  679.         " Veá postoji fajl sa opisom audio moda ")
  680.     (set #t_overwritemode2 " prisutan u ")
  681.     (set #t_overwritemode3    (cat
  682.         ".\n\n"
  683.         " Da li äelite da zapiãem preko njega?"
  684.         " Sve promene koje ste naàinili na njemu biáe izgubljene!"
  685.     ))
  686. ))
  687.  
  688. (if (= @language "suomi")
  689. (    ; Translated by Petteri Kallio <k140734@cs.tut.fi>
  690.     (set #t_welcome        (cat
  691.         " Tervetuloa AHI-asennukseen. AHI on äänijärjestelmä,"
  692.         " jonka avulla saat käyttöösi Amigan standardin äänipiirin"
  693.         " (Paula) lisäksi myös useita varsinaisia äänikortteja."
  694.         " Tämä on AHI:n neljäs (4.) versio."
  695.     ))
  696.     (set #t_oldinstaller    (cat
  697.         " Käytössäsi on Installer-ohjelman vahentunut versio."
  698.         " Voit jatkaa asennusta, mutta asennuksessa saattaa"
  699.         " mennä jotain pieleen. Todennäköisesti tarvitsen"
  700.         " Installer-ohjelman version 43.3 tai uudemman."
  701.         " Haluaisitko kuitenkin jatkaa asennusta?"
  702.     ))
  703.     (set #t_oldinstallerhelp (cat
  704.         " Käyttämäsi Installer-ohjelma on liian vanha versio."
  705.         " Löydät uudemman version vaikkapa Internetistä, esim."
  706.         " Aminetistä, hakemistosta util/misc. Tuoreimman"
  707.         " Installer-ohjelman nimi on  \"Installer-43_3.lha\":\n"
  708.         " <URL:ftp://ftp.germany.aminet.org/pub/aminet/util/misc/Installer-43_3.lha"
  709.     
  710.     ))
  711.     (set #t_installaborted    "Asennus keskeytetty.")
  712.  
  713.     (set #t_installing    "Asennan... ")
  714.     (set #t_installingdocs    "Asennan kehitysympäristön ohjetiedostoja")
  715.     (set #t_installingincs    "Asennan include-tiedostoja")
  716.     (set #t_installingsrc    "Asennan esimerkkilähdekoodeja")
  717.     (set #t_nofiles        "Ei asennettavia tiedostoja.")
  718.  
  719.     (set #t_nohelp        "Ohjeita ei ole saatavissa.")
  720.  
  721.     (set #t_parts        "Mitkä osat AHI:sta haluat asentaa?")
  722.     (set #t_system        "Järjestelmätiedostot")
  723.     (set #t_prefs        "Asetusohjelma")
  724.     (set #t_audio        "AUDIO-käsittelijä");
  725.     (set #t_userdoc        "Käyttäjän ohjeet")
  726.     (set #t_a-developer    "Sovellusten kehitysympäristön tiedostot")
  727.     (set #t_d-developer    "Ajurien kehitysympäristön tiedostot")
  728.     (set #t_userhelp    (cat
  729.         "Järjestelmätiedostot:\n"
  730.         " Tämä on AHI-äänijärjestelmän sydän."
  731.         " Se täytyy olla asennettuna, ennen kuin AHI:n muut"
  732.         " osat toimivat.\n\n"
  733.         "Asetusohjelma:\n"
  734.         " Asetusohjelmaa käytetään muokkaamaan AHI:n lukuisia asetuksia.\n"
  735.         " Asetusohjelma vaatii, että BGUI on asennettu.\n\n"
  736.         "AUDIO-käsittelijä:\n"
  737.         " Mahdollistaa äänitiedostojen toiston ja tallennuksen"
  738.         " 'copy'-komennon avulla.\n\n"
  739.         "Käyttäjän ohjeet:\n"
  740.         " AmigaGuide®-muotoinen tiedosto, jossa selvitetään"
  741.         " AHI-äänijärjestelmä ja sen eri osat.\n\n"
  742.     ))
  743.     (set #t_devhelp        (cat
  744.         "Sovellusten kehitysympäristön tiedostot:\n"
  745.         " Autodocit, include-tiedostot, esimerkkilähdekoodit jne."
  746.         " Tarpeellisia jos haluat käyttää AHI-äänijärjestelmää"
  747.         " omissa sovellusohjelmissasi.\n\n"
  748.         "Ajurien kehitysympäristön tiedostot:\n"
  749.         " Autodocit, esimerkkilähdekoodit jne. Tarpeellisia ainoastaan"
  750.         " jos aiot tehdä uusia äänikorttiajureita.\n\n"
  751.     ))
  752.  
  753.  
  754.     (set #t_languages    (cat
  755.         "Mille kielille haluat tehdä asennuksen?"
  756.         " Valmiskielenä on englanti."))
  757.     (set #t_languageshelp    (cat
  758.         " Jos oma kielesi ei ole listassa, AHI:n tekijä olisi"
  759.         " mielissään, jos sinä voisit tehdä käännöksen omalle"
  760.         " kielellesi. Käännä tiedostot User/Catalogs/NewCatalog.ct"
  761.         " ja User/Catalogs/NewPrefsCatalog.ct, ja lähetä ne"
  762.         " tähän osoitteeseen:\n"
  763.         " lcs@lysator.liu.se\n\n"
  764.     ))
  765.  
  766.     (set #t_drivers        (cat
  767.         "Mitkä AHI-ajurit haluat asentaa?"
  768.         " Asenna ainoastaan tarvitsemasi ajurit."))
  769.     (set #t_drivershelp    (cat
  770.         "Concierto:\n"
  771.         " Concierto-äänikortti.\n\n"
  772.         "Delfina:\n"
  773.         " Delfina Classic/Lite -äänikortti.\n\n"
  774.         "Filesave:\n"
  775.         " Kirjoita/lue äänitiedosto tiedostoon.\n\n"
  776.         "Maestro Pro:\n"
  777.         " Maestro Pro -äänikortti.\n\n"
  778.         "Melody Z2:\n"
  779.         " Melody Z2-äänikortti.\n\n"
  780.         "Melody 1200:\n"
  781.         " Melody 1200-äänikortti.\n\n"
  782.         "Paula:\n"
  783.         " Amigan perusäänijärjestelmä.\n\n"
  784.         "Prelude:\n"
  785.         " Prelude-äänikortti.\n\n"
  786.         "Toccata:\n"
  787.         " Toccata-äänikortti.\n\n"
  788.         "Wavetools:\n"
  789.         " Wavetools-äänikortti.\n\n"
  790.     ))
  791.  
  792.     (set #t_CPUver        "Mitkä versiot ohjelmakoodista haluat asentaa?")
  793.     (set #t_CPUverhelp    (cat
  794.         " 68020-prosessorille optimoidut versiot ovat nopeampia ja"
  795.         " usein pienikokoisempia kuin 68000-prosessorille tehdyt"
  796.         " perusversiot. AHI-äänijärjestelmän 68000-versioissa on"
  797.         " vähemmän ominaisuuksia ja huonompi äänenlaatu."
  798.         " 68020-versiot kannattaa asentaa, jos käytössäsi"
  799.         " on vähintään 68020-prosessorilla varustettu kone.\n"
  800.         " 68060-versio välttää hitaita 64-bittisiä jakolaskuja. Älä"
  801.         " asenna tätä versiota ellei sinulla ole 68060-prosessoria!\n\n"
  802.     ))
  803.  
  804.     (set #t_devfiles    "Mitkä kehitysympäristön tiedostot haluat asentaa?")
  805.     (set #t_devdocs        "Autodocit ja AHI-kehitysympäristön ohjeet")
  806.     (set #t_source        "Esimerkkilähdekoodit")
  807.     (set #t_asm        "Assemblerin include-tiedostot")
  808.     (set #t_cgen        "Yleiset C include-tiedostot")
  809.     (set #t_e        "E moduletiedostot")
  810.     (set #t_fd        "FD-tiedostot")
  811.     (set #t_gg        "Ylimääräiset GeekGadgets gcc include-tiedostot")
  812.     (set #t_sas        "Ylimääräiset SAS/C (ja DICE) include-tiedostot")
  813.     (set #t_storm        "Ylimääräiset StormC include-tiedostot")
  814.     (set #t_devfileshelp    (cat
  815.         "Autodocit ja AHI-kehitysympäristön ohjeet:\n"
  816.         " AHI:n autodocit ja ohjelmointisäännöt.\n\n"
  817.         "Esimerkkilähdekoodit:\n"
  818.         " Joitain esimerkkiohjelmia, suurin osa C-kielellä, mutta"
  819.         " mukana on myös muutamia assembler-lähdekoodeja.\n\n"
  820.         "Assemblerin include-tiedostot:\n"
  821.         " Include-tiedostot, jotka tarvitset ohjelmoidessasi assemblerilla.\n\n"
  822.         "Yleiset C include-tiedostot:\n"
  823.         " Include-tiedostot, jotka tarvitset ohjelmoidessasi C-kielellä.\n\n"
  824.         "E moduletiedostot:\n"
  825.         " Moduletiedostot, AmigaE-ohjelmointia varten.\n\n"
  826.         "FD-tiedostot:\n"
  827.         " Voidaan käyttää 'lvo'-työkalun kanssa, tai jos teet"
  828.         " laitteistoajurin C-kielellä.\n\n"
  829.         "Ylimääräiset GeekGadgets gcc include-tiedostot:\n"
  830.         " Gcc:n erikoisinclude-tiedostot (inline, proto jne).\n\n"
  831.         "Ylimääräiset SAS/C (ja DICE) include-tiedostot:\n"
  832.         " SAS/C:n erikoisinclude-tiedostot (pragma, proto jne)."
  833.         " Toimivat osin myös DCC:n kanssa.\n\n"
  834.         "Ylimääräiset StormC include-tiedostot:\n"
  835.         " StormC:n erikoisinclude-tiedostot (pragma, proto jne).\n\n"
  836.     ))
  837.  
  838.  
  839.     (set #t_nodevs
  840.         "Viitettä Devs: ei löytynyt. Kokeile ylempää käyttäjän tasoluokitusta.")
  841.     (set #t_noc
  842.         "Viitettä C: ei löytynyt. Kokeile ylempää kättäjän tasoluokitusta.")
  843.     (set #t_noprefs
  844.         "Hakemistoa Sys:Prefs ei löytynyt. Kokeile ylempää käyttäjän tasoluokitusta.")
  845.     (set #t_nol
  846.         "Viitettä L: ei löytynyt. Kokeile ylempää käyttäjän tasoluokitusta.")
  847.     (set #t_devspath    "Minne haluat asentaa järjestelmätiedostot?")
  848.     (set #t_devspathhelp    (cat
  849.         " Valitsemaasi hakemistoon tulee olla viite Devs:."
  850.         " Asennusohjelma kopioi ahi.device-tiedoston, laitteistoajurit"
  851.         " ja audiotilojen kuvaustiedostot tähän hakemistoon."
  852.         " Ajureille ja audiotilatiedostoille luodaan alihakemistot.\n\n"
  853.     ))
  854.     (set #t_cpath        "Minne haluat asentaa ohjelman 'AddAudioModes'?")
  855.     (set #t_cpathhelp    (cat
  856.         " AddAudioModes on pieni komentoriviohjelma, jonka avulla"
  857.         " voit muokata audiotiloja sisältävää tietokantaa"
  858.         " (aivan kuten näyttötilojen tietokanta).\n"
  859.         " Komentoriviohjelmat sijaitsevat yleensä hakemistossa C:.\n\n"
  860.     ))
  861.  
  862.  
  863.     (set #t_localepath    "Minne haluat asentaa sanastot?")
  864.     (set #t_localepathhelp    (cat
  865.         " Valitsemaasi hakemistoon tulee olla viite Locale:."
  866.         " Asennusohjelma kopioi valitsemasi sanastot tässä"
  867.         " hakemistossa oleviin alihakemistoihin.\n\n"
  868.     ))
  869.  
  870.     (set #t_prefspath    "Minne haluat asentaa asetusohjelman?")
  871.     (set #t_prefspathhelp    (cat
  872.         " Asetusohjelman avulla voit määrittää AHI-äänijärjestelmän"
  873.         " asetukset. Voit valita haluamasi laitteiston, fyysiset"
  874.         " ulostulot ja sisäänmenot jne. Asetusohjelmat sijaitsevat"
  875.         " normaalisti hakemistossa Sys:Prefs/.\n"
  876.         " Tämä ohjelma vaatii toimiakseen BGUI:n.\n\n"
  877.     ))
  878.  
  879.     (set #t_audiohelp    (cat
  880.         " AUDIO-käsittelijää käytetään kiinnitettäessä laitetta AUDIO:."
  881.         " Kopioimalla tiedostoja tälle laitteelle tai tältä laitteelta"
  882.         " voit toistaa ja tallentaa raakaa äänitietoa, IFF-AIFF- tai"
  883.         " IFF-AIFC-tiedostoja.\n\n"
  884.     ))
  885.  
  886.     (set #t_lpath        "Minne haluat asentaa AUDIO-käsittelijän?")
  887.     (set #t_lpathhelp    (cat
  888.         #t_audiohelp
  889.         " Käsittelijät sijaitsevat yleensä hakemistossa L:.\n\n"
  890.     ))
  891.  
  892.     (set #t_dosdevpath    "Minne haluat asentaa AUDIO-kiinnitystiedoston?")
  893.     (set #t_dosdevpathhelp    (cat
  894.         #t_audiohelp
  895.         " Kiinnitystiedostot sijaitsevat yleensä hakemistossa"
  896.         " Devs:DOSDrivers, jos laitteet kiinnitetään käynnistyksen"
  897.         " yhteydessä. Muutoin kiinnitystiedostot sijaitsevat"
  898.         " varmaankin hakemistossa SYS:Storage/DOSDrivers.\n\n"
  899.     ))
  900.  
  901.     (set #t_dosdriver    "Haluatko kiinnittää laitteen AUDIO: käynnistyksen yhteydessä?")
  902.     (set #t_dosdriverhelp    (cat
  903.         " Jos haluat, laite AUDIO: voidaan kiinnittää käynnistyksen"
  904.         " yhteydessä. Tämä poistaa tarpeen kiinnittää laite erikseen"
  905.         " aina kun haluat käyttää sitä. Kiinnitys ei vie paljoakaan"
  906.         " muistia, joten on suositeltavaa, että valitset 'Kyllä'.\n\n"
  907.     ))
  908.  
  909.     (set #t_userdocpath    "Minne haluat asentaa käyttäjän ohjeet?")
  910.     (set #t_userdocpathhelp    (cat
  911.         " Ohjeet ovat AmigaGuide®-tiedostona, jossa kuvataan"
  912.         " AHI-äänijärjestelmää ja sen osia.\n\n"
  913.     ))
  914.  
  915.     (set #t_srcpath        (cat
  916.         " Minne haluat asentaa esimerkkilähdekoodit?"
  917.         " Valitsemaasi hakemistoon luodaan alihakemisto AHI."
  918.     ))
  919.     (set #t_srcpathhelp    (cat
  920.         " Esimerkkilähdekoodit, sekä C- että assembler-kieliset,"
  921.         " tallennetaan alihakemistoon AHI. Kaikki entiset tiedostot"
  922.         " hakemistossa AHI tuhotaan!\n\n"
  923.     ))
  924.     (set #t_oldsrc        (cat
  925.         " Siellä on jo alihakemisto AHI."
  926.         " Kaikki tiedostot alihakemistossa AHI poistetaan."
  927.     ))
  928.  
  929.     (set #t_devdocspath    " Minne haluat asentaa kehitysympäristön ohjeet?")
  930.     (set #t_devdocspathhelp    (cat
  931.         " Asennusohjelma sijoittaa autodocit ja AHI-kehitysympäristön"
  932.         " ohjeet valitsemaasi hakemistoon.\n\n"
  933.     ))
  934.  
  935.     (set #t_aincpath    " Missä sijaitsevat assemblerisi include-tiedostot?")
  936.     (set #t_aincpathhelp    (cat
  937.         " Asennusohjelma sijoittaa assemblerin include-tiedostot"
  938.         " valitsemasi hakemiston alihakemistoihin (lvo, devices ja"
  939.         " libraries).\n\n"
  940.     ))
  941.  
  942.     (set #t_fdpath        " Missä sijaitsevat FD-tiedostosi?")
  943.     (set #t_fdpathhelp    (cat
  944.         " FD-tiedostot kuvaavat kirjaston tai laitteen toimintoja."
  945.         " Niitä voidaan käyttää 'lvo'-ohjelman kanssa, ja niistä"
  946.         " voi olla hyötyä kirjoittaessasi laitteistoajureita.\n\n"
  947.     ))
  948.  
  949.     (set #t_cincpath    " Missä sijaitsevat C-kääntäjäsi include-tiedostot?")
  950.     (set #t_cincpathhelp    (cat
  951.         " Asennusohjelma sijoittaa yleiset C-kääntäjän include-tiedostot"
  952.         " valitsemasi hakemiston alihakemistoihin (clib, devices"
  953.         " ja libraries).\n\n"
  954.     ))
  955.  
  956.     (set #t_emodpath    " Missä sijaitsevat E moduletiedostosi?")
  957.     (set #t_emodpathhhelp    (cat
  958.         " Asennusohjelma sijoittaa E moduletiedostot valitsemasi"
  959.         " hakemiston alihakemistoihin (devices ja libraries).\n\n"
  960.     ))
  961.  
  962.     (set #t_ggincpath    " Minne haluat sijoittaa GeekGadgets gcc include-tiedostot?")
  963.     (set #t_ggincpathhelp    (cat
  964.         " Gcc tarvitsee muutamia ylimääräisiä tiedostoja"
  965.         " tietääkseen mitä rekistereitä voidaan käyttää"
  966.         " kutsuttaessa AHI-funktioita. Tämä tieto on"
  967.         " tiedostoissa, jotka kopioidaan alihakemistoihin"
  968.         " inline, pragmas ja proto.\n\n"
  969.     ))
  970.  
  971.     (set #t_sasincpath    " Minne haluat sijoitta SAS/C (ja DICE) include-tiedostot?")
  972.     (set #t_sasincpathhelp    (cat
  973.         " SAS/C (ja DICE) tarvitsevat muutamia ylimääräisiä"
  974.         " tiedostoja tietääkseen mitä rekistereitä voidaan"
  975.         " käyttää kutsuttaessa AHI-funktioita. Tämä tieto on"
  976.         " tiedostoissa, jotka kopioidaan alihakemistoihin"
  977.         " pragmas ja proto.\n\n"
  978.     ))
  979.  
  980.     (set #t_stormincpath    " Minne haluat sijoittaa StormC include-tiedostot?")
  981.     (set #t_stormincpathhelp (cat
  982.         " StormC tarvitsee muutamia ylimääräisiä tiedostoja"
  983.         " tietääkseen mitä rekistereitä voidaan käyttää"
  984.         " kutsuttaessa AHI-funktioita. Tämä tieto on tiedostoissa,"
  985.         " jotka kopioidaan alihakemistoihin pragma ja proto.\n\n"
  986.     ))
  987.  
  988.     (set #t_ahidevhelp    (cat
  989.         " Ahi.device on AHI-äänijärjestelmän sydän."
  990.         " Tämä on ainoa osa, joka näkyy muille ohjelmille.\n\n"
  991.     ))
  992.  
  993.     (set #t_runaddmodes    (cat
  994.         " Ajan komennon AddAudioModes luodakseni"
  995.         " audiotilatietokannan."
  996.     ))
  997.  
  998.  
  999.     (set #t_overwritemode1
  1000.         " Audiotilakuvauksesta on jo olemassa kopio ")
  1001.     (set #t_overwritemode2 " tiedostossa ")
  1002.     (set #t_overwritemode3    (cat
  1003.         ".\n\n"
  1004.         " Kirjoitetaanko päälle?"
  1005.         " Kaikki audiotilaan tekemäsi muutokset tulevat katoamaan!"
  1006.     ))
  1007.  
  1008. ))
  1009.  
  1010. (if (= @language "ÃeÓtina")
  1011. (    ; Tranlated by Vit Sindlar <sindlarv@hotmail.com>
  1012.  
  1013.     (set #t_welcome        (cat
  1014.         " VÉtejte pÒi instalaci AHI. AHI je pÒesmÅrovatelnÙ"
  1015.         " audio syst×m, kterÙ je moÚno pouÚÉvat jak s vestavÅnÙm"
  1016.         " zvukovÙm Ãipem (Paula), tak i nÅkolika zvukovÙmi kartami."
  1017.         " AktuÁlnÉ verze tohoto software je 4."
  1018.     ))
  1019.     (set #t_oldinstaller    (cat
  1020.         " VlastnÉte starou verzi programu Installer. Tento"
  1021.         " instalaÃnÉ skript pravdÅpodobnÅ vyÚaduje verzi 43.3"
  1022.         " a vyÓÓÉ. Instalace bude pokraÃovat, ale nelze zaruÃit,"
  1023.         " Úe vÓe bude fungovat, tak jak mÁ.\n"
  1024.         " Opravdu si pÒejete pokraÃovat?"
  1025.     ))
  1026.     (set #t_oldinstallerhelp (cat
  1027.         " Verze programu Installer, kterÙ pouÚÉvÁte je pÒÉliÓ"
  1028.           " starÁ. NejnovÅjÓÉ verzi naleznete vÚdy na Internetu,"
  1029.         " napÒ. na Aminetu, v adresÁÒi util/misc. NÁzev archÉvu"
  1030.         " je \"Installer-43_3.lha\":\n"
  1031.         " <URL:ftp://ftp.germany.aminet.org/pub/aminet/util/misc/Installer-43_3.lha"
  1032.  
  1033.     ))
  1034.     (set #t_installaborted    "Instalace byla pÒeruÓena.")
  1035.  
  1036.     (set #t_installing        "ProbÉhÁ instalace ")
  1037.     (set #t_installingdocs    "Instaluje se dokumentace pro vÙvojÁÒe")
  1038.     (set #t_installingincs    "InstalujÉ se includes")
  1039.     (set #t_installingsrc    "InstalujÉ se pÒÉklady zdrojovÙch kÏdÊ")
  1040.     (set #t_nofiles        "Soubory pro instalaci chybÉ.")
  1041.  
  1042.     (set #t_nohelp        "Pro tuto poloÚku nenÉ dostupnÁ nÁpovÅda.")
  1043.  
  1044.     (set #t_parts        "Kter× ÃÁsti AHI si pÒejete nainstalovat?")
  1045.     (set #t_system        "Syst×mov× soubory")
  1046.     (set #t_prefs        "Program pro nastavenÉ")
  1047.     (set #t_audio        "AUDIO handler");
  1048.     (set #t_userdoc        "UÚivatelskÁ dokumentace")
  1049.     (set #t_a-developer    "Soubory pro vÙvojÁÒe programÊ")
  1050.     (set #t_d-developer    "Soubory pro vÙvojÁÒe ovladaÃÊ")
  1051.     (set #t_userhelp    (cat
  1052.         "Syst×mov× soubory:\n"
  1053.         " Syst×mov× soubory - to je vlastnÅ jÁdro cel×ho AHI a musÉ"
  1054.         " bÙt vÚdy nainstalovÁny. Jsou nutn× pro sprÁvnou funkci"
  1055.         " vÓech ostatnÉch komponent.\n\n"
  1056.         "Program pro nastavenÉ:\n"
  1057.         " Program pro nastavenÉ - je pouÚÉvÁn pro pohodln× nastavenÉ"
  1058.         " mnoha voleb AHI. Tato ÃÁst AHI vyÚaduje ke sv× Ãinnosti"
  1059.         " nainstalovanou knihovnu BGUI.library.\n\n"
  1060.         "AUDIO handler:\n"
  1061.         " UmoÚÎuje pÒehrÁvat a zaznamenÁvat samply velice jednoduÓe"
  1062.         " pomocÉ pÒÉkazu 'copy'.\n\n"
  1063.         "UÚivatelskÁ dokumentace:\n"
  1064.         " Dokumentace napsanÁ ve standardnÉm formÁtu AmigaGuide®,"
  1065.         " kterÁ popisuje AHI a ostatnÉ ÃÁsti syst×mu.\n\n"
  1066.     ))
  1067.     (set #t_devhelp        (cat
  1068.         "Soubory pro vÙvojÁÒe programÊ:\n"
  1069.         " Autodocs, includes, pÒÉkladov× zdrojov× kÏdy atd."
  1070.         " Je nutn× nainstalovat pouze v pÒÉpadÅ, Úe budete vyvÉjet"
  1071.         " svÊj vlastnÉ program s podporou AHI.\n\n"
  1072.         "Soubory pro vÙvojÁÒe ovladaÃÊ:\n"
  1073.         " Autodocs, pÒÉkladovÙ zdrojovÙ kÏd atd. Je nutn× pouze"
  1074.         " v pÒÉpadÅ, Úe budete vyvÉjet ovladaÃe pro zvukov× karty.\n\n"
  1075.     ))
  1076.  
  1077.     (set #t_gui        (cat
  1078.         " Kterou z verzÉ programÊ pro nastavenÉ byste si pÒÁli"
  1079.         " nainstalovat?"
  1080.     ))
  1081.     (set #t_guihelp        (cat
  1082.         " Zvolte typ GUI, kter×mu dÁvÁte pÒednost, prosÉm.\n\n"
  1083.     ))
  1084.     (set #t_guibgui        "Verze v BGUI")
  1085.     (set #t_guimui        "Verze v MUI")
  1086.  
  1087.     (set #t_icon         "Kter× ikony si pÒejete nainstalovat?")
  1088.     (set #t_iconstd        "StandardnÉ 4-barevn×")
  1089.     (set #t_iconmwb        "8-barevn× typu MagicWB")
  1090.     (set #t_iconhelp    (cat
  1091.         " Zde si zvolÉte druh ikony, kterou si pÒejete pouÚÉvat pro"
  1092.         " program pro nastavenÉ. Autorem ikony typu MagicWB je Erol Ismael.\n\n"
  1093.     ))
  1094.  
  1095.     (set #t_languages    (cat
  1096.         "KterÙ z jazykÊ si pÒejete nainstalovat?"
  1097.         " StandardnÉ je angliÃtina."))
  1098.     (set #t_languageshelp    (cat
  1099.         " JestliÚe chybÉ zrovna pÒeklad do VaÓeho jazyka, autor AHI"
  1100.         " by VÁs velmi rÁd poÚÁdal o pÒeklad. Upravte a pÒeloÚte"
  1101.         " soubory User/Catalogs/NewCatalog.ct a User/Catalogs/NewPrefsCatalog.ct"
  1102.         " a poÓlete je na tuto adresu:\n"
  1103.         " lcs@lysator.liu.se\n\n"
  1104.         " Je dobr× se nejdÒÉve zeptat autora, zda jiÚ nÅkdo pÒeklad"
  1105.         " do VaÓeho jazyka nedÅlÁ.\n\n"
  1106.  
  1107.     ))
  1108.  
  1109.     (set #t_drivers        (cat
  1110.         "Kter× z ovladaÃÊ AHI si pÒejete nainstalovat?"
  1111.         " Je lepÓÉ si nainstalovat pouze ovladaÃe, kter× skuteÃnÅ potÒebujete."))
  1112.     (set #t_drivershelp    (cat
  1113.         "Concierto:\n"
  1114.         " ZvukovÁ karta Concierto.\n\n"
  1115.         "Delfina:\n"
  1116.         " ZvukovÁ karta Delfina s DSP.\n\n"
  1117.         "Filesave:\n"
  1118.         " UmoÚnÉ ÃtenÉ/zÁpis samplÊ do souboru.\n\n"
  1119.         "Maestro Pro:\n"
  1120.         " ZvukovÁ karta Maestro Pro.\n\n"
  1121.         "Melody Z2:\n"
  1122.         " ZvukovÁ karta Melody Z2.\n\n"
  1123.         "Melody 1200:\n"
  1124.         " ZvukovÁ karta Melody 1200.\n\n"
  1125.         "Paula:\n"
  1126.         " StandardnÉ zvukovÙ Ãip Amigy.\n\n"
  1127.         "Prelude:\n"
  1128.         " ZvukovÁ karta Prelude.\n\n"
  1129.         "Toccata:\n"
  1130.         " ZvukovÁ karta Toccata.\n\n"
  1131.         "Wavetools:\n"
  1132.         " ZvukovÁ karta Wavetools.\n\n"
  1133.     ))
  1134.  
  1135.     (set #t_CPUver        "Pro jakÙ procesor si pÒejete nainstalovat programy?")
  1136.     (set #t_CPUverhelp        (cat
  1137.         " Programy optimalizovan× pro 68020 a vyÓÓÉ jsou mnohem"
  1138.         " rychlejÓÉ a Ãasto tak× menÓÉ neÚ verze pro obyÃejnou 68000."
  1139.         " NavÉc, v pÒÉpadÅ AHI, majÉ verze pro 68000 m×nÅ funkcÉ"
  1140.         " a pracujÉ s omezenou kvalitou zvuku. SkuteÃnÅ VÁm doporuÃuji"
  1141.         " zvolit pÒi instalaci verze programÊ optimalizovan× pro 68020.\n"
  1142.         " Verze pro 68060 neprovÁdÉ pomalÁ 64-bitovÁ dÅlenÉ. Pokud tedy"
  1143.         " tento procesor nevlastnÉte, neinstalujte ji!\n\n"
  1144.     ))
  1145.  
  1146.     (set #t_devfiles    "Kter× ze souborÊ pro vÙvojÁÒe si pÒejete nainstalovat?")
  1147.     (set #t_devdocs    "Autodocs a dokumentaci pro vÙvojÁÒe k AHI")
  1148.     (set #t_source        "PÒÉkladov× zdrojov× kÏdy")
  1149.     (set #t_asm        "Includes pro assembler")
  1150.     (set #t_cgen        "Includes pro obecn× C")
  1151.     (set #t_e            "Moduly pro E")
  1152.     (set #t_fd        "Soubory FD")
  1153.     (set #t_gg        "Dodatkov× includes pro GeekGadgets gcc")
  1154.     (set #t_sas        "Dodatkov× includes pro SAS/C (a DICE)")
  1155.     (set #t_storm        "Dodatkov× includes pro StormC")
  1156.     (set #t_devfileshelp    (cat
  1157.         "Autodocs a dokumentaci pro vÙvojÁÒe k AHI:\n"
  1158.         " Autodocs a pravidla pro programovÁnÉ AHI.\n\n"
  1159.         "PÒÉkladov× zdrojov× kÏdy:\n"
  1160.         " NÅkolik pÒÉkladovÙch programÊ, nejÃastÅji jsou napsÁny v C,"
  1161.         " ale je tam i nÅkolik kouskÊ v assembleru.\n\n"
  1162.         "Includes pro assembler:\n"
  1163.         " Includes, kter× jsou tÒeba pro programovÁnÉ v assembleru.\n\n"
  1164.         "Includes pro obecn× C:\n"
  1165.         " Includes, kter× jsou tÒeba pro programovÁnÉ v C.\n\n"
  1166.         "Moduly pro E:\n"
  1167.         " Moduly, kter× jsou nutn× pro AmigaE.\n\n"
  1168.         "Soubory FD:\n"
  1169.         " Pro pouÚitÉ s programem 'lvo', nebo v pÒÉpadÅ, Úe budete"
  1170.         " psÁt ovladaàpro zvukovou kartu v C.\n\n"
  1171.         "Dodatkov× includes pro GeekGadgets gcc:\n"
  1172.         " SpeciÁlnÉ includes pro gcc (inline, proto atd).\n\n"
  1173.         "Dodatkov× includes pro SAS/C (a DICE):\n"
  1174.         " SpeciÁlnÉ includes pro SAS/C (pragmas, proto atd)."
  1175.         " Budou fungovat tak× s DCC, ale bez volÁnÉ tagÊ.\n\n"
  1176.         "Dodatkov× includes pro StormC:\n"
  1177.         " SpeciÁlnÉ includes pro StormC (pragmas, proto atd).\n\n"
  1178.     ))
  1179.  
  1180.  
  1181.     (set #t_nodevs            (cat
  1182.         "Nelze nal×zt pÒiÒazenÉ Devs:. PouÚijte vyÓÓÉ mÏd instalace"
  1183.         " (pro zkuÓenÅjÓÉ uÚivatele)."
  1184.     ))
  1185.     (set #t_noc            (cat
  1186.         "Nelze nal×zt pÒiÒazenÉ C:. PouÚijte vyÓÓÉ mÏd instalace"
  1187.         " (pro zkuÓenÅjÓÉ uÚivatele)."
  1188.     ))
  1189.     (set #t_noprefs        (cat
  1190.         "Nelze nal×zt adresÁÒ Sys:Prefs. PouÚijte vyÓÓÉ mÏd instalace"
  1191.         " (pro zkuÓenÅjÓÉ uÚivatele)."
  1192.     ))
  1193.     (set #t_nol            (cat
  1194.         "Nelze nal×zt pÒiÒazenÉ L:. PouÚijte vyÓÓÉ mÏd instalace"
  1195.         " (pro zkuÓenÅjÓÉ uÚivatele)."
  1196.     ))
  1197.     (set #t_devspath    "Kam si pÒejete nainstalovat syst×mov× soubory?")
  1198.     (set #t_devspathhelp    (cat
  1199.         " AdresÁÒ, kterÙ zvolÉte musÉ bÙt souÃÁstÉ pÒiÒazenÉ Devs:."
  1200.         " PÒi instalaci se tam nakopÉruje ahi.device, ovladaÃe pro"
  1201.         " hardware a soubory pro jednotliv× audio mÏdy."
  1202.         " Pro ovladaÃe a soubory s jednotlivÙmi audio mÏdy budou"
  1203.         " vytvoÒeny podadresÁÒe.\n\n"
  1204.     ))
  1205.     (set #t_cpath        "Kam si pÒejete nainstalovat AddAudioModes?")
  1206.     (set #t_cpathhelp        (cat
  1207.         " AddAudioModes je pÒÉkaz, kterÙ slouÚÉ ke sprÁvÅ databÁze"
  1208.         " audio mÏdÊ (podobnost s databÁzÉ rozliÓovacÉch mÏdÊ je"
  1209.         " ÃistÅ nÁhodnÁ :-). PÒÉkaz by mÅl bÙt normÁlnÅ umÉstÅn"
  1210.         " v pÒiÒazenÉ C:.\n\n"
  1211.     ))
  1212.  
  1213.  
  1214.     (set #t_localepath    "Kam si pÒejete nainstalovat lokalizaÃnÉ katalogy?")
  1215.     (set #t_localepathhelp    (cat
  1216.         " AdresÁÒ, kterÙ zvolÉte musÉ bÙt souÃÁstÉ pÒiÒazenÉ Locale:."
  1217.         " PÒi instalaci se tam nakopÉrujÉ lokalizaÃnÉ katalogy, kter×"
  1218.         " jste si vybrali. PochopitelnÅ budou jednotliv× katalogy"
  1219.         " nakopÉrovÁny do pÒÉsluÓnÙch adresÁÒÊ s danÙm jazykem.\n\n"
  1220.     ))
  1221.  
  1222.     (set #t_prefspath    "Kam si pÒejete nainstalovat program pro nastavenÉ?")
  1223.     (set #t_prefspathhelp    (cat
  1224.         " Program pro nastavenÉ VÁm umoÚnÉ nakonfigurovat AHI pÒesnÅ"
  1225.         " dle moÚnostÉ poÃÉtaÃe. Je zde moÚno nastavit, kterou z ÃÁstÉ"
  1226.         " zvukov×ho hardware si pÒejete pouÚÉvat, jak× vstupy a vÙstupy"
  1227.         " atd. Programy pro nastavenÉ se obvykle nachÁzÉ v adresÁÒi"
  1228.         " SYS:Prefs/.\n"
  1229.         " Tento program vyÚaduje balÉk BGUI nebo MUI, coÚ zÁleÚÉ na"
  1230.         " volbÅ verze programu pro nastavenÉ.\n\n"
  1231.     ))
  1232.  
  1233.     (set #t_audiohelp        (cat
  1234.         " AUDIO handler se pouÚÉvÁ k pÒipojenÉ zaÒÉzenÉ AUDIO:. PouhÙm"
  1235.         " kopÉrovÁnÉm souborÊ z a do tohoto zaÒÉzenÉ je moÚno pÒehrÁvat"
  1236.         " a zaznamenÁvat soubory v RAW, IFF-AIFF nebo IFF-AIFC.\n\n"
  1237.     ))
  1238.  
  1239.     (set #t_lpath        "Kam si pÒejete nainstalovat AUDIO handler?")
  1240.     (set #t_lpathhelp        (cat
  1241.         #t_audiohelp
  1242.         " Handlery jsou obvykle umÉstÅny v pÒiÒazenÉ L:.\n\n"
  1243.     ))
  1244.  
  1245.     (set #t_dosdevpath    "Kam si pÒejete nainstalovat pÒipojovacÉ soubor AUDIO (mount)?")
  1246.     (set #t_dosdevpathhelp    (cat
  1247.         #t_audiohelp
  1248.         " PÒipojovacÉ soubory (mount) jsou obvykle umÉstÅny v adresÁÒi"
  1249.         " Devs:DOSDrivers, v pÒÉpadÅ, Úe si je pÒejete pÒipojovat hned"
  1250.         " po startu. Pokud si to nepÒejete pak by mÅly bÙt pÒesunuty"
  1251.         " do adresÁÒe SYS:Storage/DOSDrivers.\n\n"
  1252.     ))
  1253.  
  1254.     (set #t_dosdriver    "PÒejete si mÉt aktivovÁn AUDIO handler ihned startu?")
  1255.     (set #t_dosdriverhelp    (cat
  1256.         " V pÒÉpadÅ, Úe si to pÒejete, je moÚno nainstalovat AHI tak,"
  1257.         " Úe zaÒÉzenÉ AUDIO: bude aktivnÉ ihned po startu. Tento zpÊsob"
  1258.         " ÓetÒÉ Ãas, kterÙ jinak musÉte vynaloÚit na proklikÁnÉ se do"
  1259.         " SYS:Storage/DOSDrivers, a nevyÚaduje mnoho pamÅti. Z tohoto"
  1260.         " dÊvodu se doporuÃuje odpovÅdÅt 'Ano'.\n\n"
  1261.     ))
  1262.  
  1263.     (set #t_userdocpath    "Kam si pÒejete nainstalovat uÚivatelskou dokumentaci?")
  1264.     (set #t_userdocpathhelp    (cat
  1265.         " Toto je soubor v formÁtu AmigaGuide®, kterÙ popisuje vlastnosti"
  1266.         " audio syst×mu AHI.\n\n"
  1267.     ))
  1268.  
  1269.     (set #t_srcpath        (cat
  1270.         " Kam si pÒejete nainstalovat pÒÉkladov× zdrojov× kÏdy?"
  1271.         " Na tomto mÉstÅ bude vytvoÒen adresÁÒ s nÁzvem AHI."
  1272.     ))
  1273.     (set #t_srcpathhelp        (cat
  1274.         " PÒÉkladov× zdrojov× kÏdy (v jazyce C i assembleru) budou"
  1275.         " uloÚeny v podadresÁÒi nazvan×m AHI. Jak×koliv soubory, kter×"
  1276.         " jsou aktuÁlnÅ uloÚeny v adresÁÒi AHI, budou smazÁny!\n\n"
  1277.     ))
  1278.     (set #t_oldsrc            (cat
  1279.         " Na tomto mÉstÅ jiÚ adresÁÒ AHI existuje."
  1280.         " VÓechny soubory v nÅm budou smazÁny."
  1281.     ))
  1282.  
  1283.     (set #t_devdocspath    " Kam si pÒejete nainstalovat dokumentaci pro vÙvojÁÒe?")
  1284.     (set #t_devdocspathhelp    (cat
  1285.         " Autodocs a dokumentace pro vÙvojÁÒe budou uloÚeny"
  1286.         " do adresÁÒe, kterÙ si zvolÉte.\n\n"
  1287.     ))
  1288.  
  1289.     (set #t_aincpath    " Kde mÁte uloÚen× sv× includes pro assembler?")
  1290.     (set #t_aincpathhelp    (cat
  1291.         " Includes pro assembler budou uloÚeny do svÙch podadresÁÒÊ"
  1292.         " (lvo, devices a libraries) na disku, kterÙ si zvolÉte.\n\n"
  1293.     ))
  1294.  
  1295.     (set #t_fdpath        " Kam si pÒejete uloÚit soubory FD?")
  1296.     (set #t_fdpathhelp        (cat
  1297.         " FD jsou soubory popisujÉcÉ funkce knihoven a zaÒÉzenÉ"
  1298.         " PouÚÉvajÉ se s programem 'lvo' a jsou tak× uÚiteÃn×"
  1299.         " pÒi vytvÁÒenÉ ovladaÃÊ pro hardware.\n\n"
  1300.     ))
  1301.  
  1302.     (set #t_cincpath    " Kde mÁte uloÚen× sv× includes pro C?")
  1303.     (set #t_cincpathhelp    (cat
  1304.         " Includes pro obecn× C budou uloÚeny do svÙch"
  1305.         " podadresÁÒÊ (clib, devices a libraries) na disku, kterÙ"
  1306.         " si zvolÉte.\n\n"
  1307.     ))
  1308.  
  1309.     (set #t_emodpath    " Kde mÁte uloÚen× sv× moduly pro E?")
  1310.     (set #t_emodpathhhelp    (cat
  1311.         " Moduly pro E budou uloÚeny do sv×ho adresÁÒe a jeho"
  1312.         " podadresÁÒÊ (devices a libraries) na disku, kterÙ si"
  1313.         " zvolÉte.\n\n"
  1314.     ))
  1315.  
  1316.     (set #t_ggincpath    " Kam si pÒejete uloÚit includes pro GeekGadgets gcc?")
  1317.     (set #t_ggincpathhelp    (cat
  1318.         " gcc potÒebuje extra soubory k tomu, aby si zjistil, kter×"
  1319.         " registry vyuÚÉvat pÒi volÁnÉ funkcÉ AHI. Tato informace"
  1320.         " je obsaÚena v souborech, kter× budou kopÉrovÁny do adresÁÒÊ"
  1321.         " inline, pragmas a proto.\n\n"
  1322.     ))
  1323.  
  1324.     (set #t_sasincpath    " Kam si pÒejete uloÚit includes pro SAS/C (a DICE)?")
  1325.     (set #t_sasincpathhelp    (cat
  1326.         " SAS/C (a DICE) potÒebuje extra soubory k tomu, aby si zjistil,"
  1327.         " kter× registry vyuÚÉvat pÒi volÁnÉ funkcÉ AHI. Tato informace"
  1328.         " je obsaÚena v souborech, kter× budou kopÉrovÁny do adresÁÒÊ"
  1329.         " inline, pragmas a proto.\n\n"
  1330.     ))
  1331.  
  1332.     (set #t_stormincpath    " Kam si pÒejete uloÚit includes pro StormC?")
  1333.     (set #t_stormincpathhelp (cat
  1334.         " StormC potÒebuje extra soubory k tomu, aby si zjistil, kter×"
  1335.         " registry vyuÚÉvat pÒi volÁnÉ funkcÉ AHI. Tato informace"
  1336.         " je obsaÚena v souborech, kter× budou kopÉrovÁny do adresÁÒÊ"
  1337.         " inline, pragmas a proto.\n\n"
  1338.     ))
  1339.  
  1340.     (set #t_ahidevhelp        (cat
  1341.         " ahi.device je jÁdrem cel×ho audio"
  1342.         " syst×mu AHI. Toto je jedinÁ ÃÁst tohoto"
  1343.         " syst×mu, o kter× 'vÉ' ostatnÉ programy.\n\n"
  1344.     ))
  1345.  
  1346.     (set #t_runaddmodes        (cat
  1347.         " Bude spuÓtÅn pÒÉkaz AddAudioModes k tomu,"
  1348.         " aby se obnovila databÁze audio mÏdÊ."
  1349.     ))
  1350.  
  1351.  
  1352.     (set #t_overwritemode1
  1353.         " V tomto adresÁÒi jiÚ soubor s popisem audio mÏdu existuje ")
  1354.     (set #t_overwritemode2 " v ")
  1355.     (set #t_overwritemode3    (cat
  1356.         ".\n\n"
  1357.         " SkuteÃnÅ si to pÒejete pÒepsat?"
  1358.         " VeÓkerÁ zmÅnÅnÁ nastavenÉ budou ztracena!"
  1359.     ))
  1360. ))
  1361.  
  1362. ;(if (= @language "svenska")
  1363. ;(    ; Translated by Your Name <your@email.adr>
  1364. ;))
  1365.  
  1366.  
  1367. ;**
  1368. ;** Procedures
  1369. ;**
  1370.  
  1371. (procedure P_INSTDRIVER #pi_audioname #pi_modename
  1372. (
  1373.     (set #pi_drvpath (tackon #devspath "AHI/"))
  1374.     (set #pi_modepath (tackon #devspath "AudioModes/"))
  1375.     (if (not (exists #pi_drvpath))
  1376.         (makedir #pi_drvpath)
  1377.     )
  1378.     (if (not (exists #pi_modepath))
  1379.         (makedir #pi_modepath)
  1380.     )
  1381.  
  1382.     (if (exists (tackon "User/Devs/AHI" (cat #pi_audioname #ver68k)))
  1383.     (
  1384.         (set #pi_audionamesrc (cat #pi_audioname #ver68k))
  1385.     )
  1386.     (
  1387.         (set #pi_audionamesrc #pi_audioname)
  1388.     ))
  1389.  
  1390.     (copylib
  1391.         (help (cat #t_drivershelp @copylib-help))
  1392.         (prompt (cat #t_installing #pi_drvpath #pi_audionamesrc))
  1393.         (source (tackon "User/Devs/AHI" #pi_audionamesrc))
  1394.         (dest #pi_drvpath)
  1395.         (newname #pi_audioname)
  1396.         (confirm)
  1397.     )
  1398.  
  1399.     (set #pt_copymode 0)
  1400.     (if (exists (tackon #pi_modepath #pi_modename))
  1401.     (if (exists (tackon #pi_modepath #pi_modename))
  1402.     (
  1403. ;        (if (askbool
  1404. ;            (prompt    (cat #t_overwritemode1
  1405. ;                #pi_modename
  1406. ;                #t_overwritemode2
  1407. ;                #pi_drvpath
  1408. ;                #t_overwritemode3
  1409. ;            ))
  1410. ;            (default 1)
  1411. ;            (help #t_drivershelp)
  1412. ;        )
  1413. ;        (
  1414.             (set #pt_copymode 1)
  1415. ;        ))
  1416.     ))
  1417.     ( ; else (exists)
  1418.         (set #pt_copymode 1)
  1419.     ))
  1420.     (if (= #pt_copymode 1)
  1421.     (
  1422.         (copyfiles 
  1423.             (prompt (cat #t_installing #pi_modepath #pi_modename))
  1424.             (source (tackon "User/Devs/AudioModes" #pi_modename))
  1425.             (dest #pi_modepath)
  1426.         )
  1427.     ))
  1428. ))
  1429.  
  1430. (procedure P_INSTCATALOG #pi_language
  1431. (
  1432.     (set #pi_dest (tackon (tackon #localepath "Catalogs") #pi_language))
  1433.     (copyfiles 
  1434.         (prompt (cat #t_installing (tackon #pi_dest #pi_language)))
  1435.         (source (tackon "User/Catalogs" #pi_language))
  1436.         (dest #pi_dest)
  1437.         (all)
  1438.     )
  1439. ))
  1440.  
  1441. ;** 
  1442. ;** Main installation procedure starts here...
  1443. ;**
  1444.  
  1445. (set    #system        1    ;System files
  1446.     #prefs        2    ;Preferences program
  1447.     #audio        4    ;The AHI handler
  1448.     #userdoc    8    ;User documentation
  1449.     #a-developer    16    ;App. programmers developer files
  1450.     #d-developer    32    ;Drv. programmers developer files
  1451. )
  1452. (set    #concierto    1    ;Sound card drivers
  1453.     #delfina    2
  1454.     #filesave    4
  1455.     #maestropro    8
  1456.     #melody        16
  1457.     #melody1200    32
  1458.     #paula        64
  1459.     #prelude    128
  1460.     #toccata    256
  1461.     #wavetools    512
  1462. )
  1463.  
  1464. (set    #devdocs    1    ;Autodocs and programming guidelines
  1465.     #source        2    ;Example source code
  1466.     #asm        4    ;Assembler include files
  1467.     #cgen        8    ;Generic C include files
  1468.     #e        16    ;E module files
  1469.     #fd        32    ;FD-files
  1470.     #gg        64    ;GeekGadgets gcc include files
  1471.     #sas        128    ;SAS/C include files
  1472.     #storm        256    ;StormC include files
  1473. )
  1474.  
  1475. ;**
  1476. ;** Make sure we're using a recent version of the installer
  1477. ;**
  1478.  
  1479. (if (< @installer-version (+ (* 43 65536) 3))
  1480. (
  1481.     (if (not (askbool
  1482.         (prompt #t_oldinstaller)
  1483.         (help #t_oldinstallerhelp)
  1484.     ))
  1485.     (
  1486.         (abort (cat #t_installaborted "\n\n" #t_oldinstallerhelp))
  1487.     ))
  1488. ))
  1489.  
  1490. ;**
  1491. ;** Welcome!
  1492. ;**
  1493.  
  1494. (welcome #t_welcome)
  1495.  
  1496. ;**
  1497. ;** Shameless plug
  1498. ;**
  1499.  
  1500. (message (cat
  1501.     " This version of AHI is freeware, which means that you, as a user,"
  1502.     " may use it free of charge.\n\n"
  1503.     " However, a PPC version will (hopefully) soon be released,"
  1504.     " and later AHI version 5,"
  1505.     " and those versions will be shareware. This is because this is"
  1506.     " the only way I can keep AHI up to date with the latest hardware"
  1507.     " and software demands. The PPC version is already several months"
  1508.     " behind schedule, all because I have no PPC card myself."
  1509.     " By making AHI shareware, I hope to be able to change this unfortunate"
  1510.     " situation.\n\n"
  1511.     " (These versions will be free for Delfina users.)"
  1512. ))
  1513.  
  1514. (message (cat
  1515.     " If you want to help future development of AHI, I encourage you to"
  1516.     " show your support by making a donation of at least US$ 15 or 100 SEK to"
  1517.     " this address:\n\n"
  1518.     " Martin Blom\n"
  1519.     " Alsättersgatan 15A:24\n"
  1520.     " SE-584 35 Linköping\n"
  1521.     " Sweden\n\n"
  1522.     " Do not forget to include your full name and email address."
  1523.     " Add your normal address as well.\n\n"
  1524.     " Thank you for your support!\n\n"
  1525. ))
  1526.     
  1527.  
  1528. ;**
  1529. ;** Find out which parts should be installed
  1530. ;**
  1531.  
  1532. (set #default 0 #helptext "")
  1533. (set #parts 0)
  1534.  
  1535. (if (exists "User")
  1536. (
  1537.     (set #helptext (cat #helptext #t_userhelp))
  1538.     (set #default (bitor #default #system #prefs #audio #userdoc))
  1539. )
  1540. ( ; else
  1541.     (set #t_system "")
  1542.     (set #t_prefs "")
  1543.     (set #t_audio "")
  1544.     (set #t_userdoc "")
  1545.  
  1546. ))
  1547.  
  1548. (if (exists "Developer")
  1549. (
  1550.     (set #helptext (cat #helptext #t_devhelp))
  1551.     (set #default (bitor #default #a-developer #d-developer))
  1552. )
  1553. ( ; else
  1554.     (set #t_a-developer "")
  1555.     (set #t_d-developer "")
  1556. ))
  1557.  
  1558. (if (= #default 0)
  1559.     (abort #t_nofiles)
  1560. )
  1561.  
  1562. (complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
  1563.  
  1564. ;**
  1565. ;**  Ask which parts should be installed
  1566. ;**
  1567.  
  1568. (if (= @user-level 0)
  1569. (
  1570.     (set #parts #default)
  1571. )
  1572. ( ; Average or Expert
  1573.     (set #parts (askoptions
  1574.         (prompt #t_parts)
  1575.         (help (cat #helptext @askoptions-help))
  1576.         (choices #t_system #t_prefs #t_audio #t_userdoc #t_a-developer #t_d-developer)
  1577.         (default #default)
  1578.     ))
  1579. ))
  1580.  
  1581. ;**
  1582. ;**  Which GUI system?
  1583. ;**
  1584.  
  1585. (set    #gui_bgui    0    ;Use BGUI
  1586.     #gui_mui    1    ;Use MUI
  1587. )
  1588.  
  1589. (set #gui #gui_bgui)
  1590.  
  1591. (if (bitand #parts #prefs)
  1592.     (set #gui (askchoice
  1593.         (prompt #t_gui)
  1594.         (help (cat #t_guihelp @askchoice-help))
  1595.         (choices #t_guibgui #t_guimui)
  1596.         (default #gui))
  1597.     )
  1598. )    
  1599.  
  1600. (if (= #gui #gui_bgui)
  1601.     (set #prefssrc "AHI_BGUI")
  1602. )
  1603. (if (= #gui #gui_mui)
  1604.     (set #prefssrc "AHI_MUI")
  1605. )
  1606.  
  1607.  
  1608. ;**
  1609. ;**  Which icon?
  1610. ;**
  1611.  
  1612. (set    #icon_std    0
  1613.     #icon_mwb    1
  1614. )
  1615.  
  1616. (set #icon #icon_std)
  1617.  
  1618. (if (<> (getenv "MagicWB") "")
  1619.     (set #icon #icon_mwb)
  1620. )
  1621.  
  1622. (if (bitand #parts (bitor #prefs #audio))
  1623.     (set #icon (askchoice
  1624.         (prompt #t_icon)
  1625.         (help (cat #t_iconhelp @askchoice-help))
  1626.         (choices #t_iconstd #t_iconmwb)
  1627.         (default #icon))
  1628.     )
  1629. )    
  1630.  
  1631.  
  1632. ;**
  1633. ;**  Activate the AUDIO handler at boot time?
  1634. ;**
  1635.  
  1636. (set #dosdevpath    "Devs:DOSDrivers")
  1637.  
  1638. (if (and (bitand #parts #audio) (>= @user-level 1))
  1639.     (if (not (askbool
  1640.         (prompt #t_dosdriver)
  1641.         (help (cat #t_dosdriverhelp @askbool-help))
  1642.         (default 1)))
  1643.     (
  1644.         (set #dosdevpath "SYS:Storage/DOSDrivers")
  1645.     ))
  1646. )
  1647.  
  1648. ;**
  1649. ;**  Ask which languages should be installed
  1650. ;**
  1651.  
  1652. (set    #dansk        1
  1653.     #deutsch    2
  1654.     #español    4
  1655.     #français    8
  1656.     #greek        16
  1657.     #hrvatski    32
  1658.     #íslenska    64
  1659.     #italiano    128
  1660.     #magyar        256
  1661.     #nederlands    512
  1662.     #norsk        1024
  1663.     #polski        2048
  1664.     #português    4096
  1665.     #russian    8192
  1666.     #srpski        16384
  1667.     #suomi        32768
  1668.     #svenska    65536
  1669.     #ÃeÓtina    131072
  1670.  
  1671. )
  1672.  
  1673. (set    #t_dansk    "Dansk"
  1674.     #t_deutsch    "Deutsch"
  1675.     #t_español    "Español"
  1676.     #t_français    "Français"
  1677.     #t_greek    "Greek"
  1678.     #t_hrvatski    "Hrvatski"
  1679.     #t_íslenska    "Íslenska"
  1680.     #t_italiano    "Italiano"
  1681.     #t_magyar    "Magyar"
  1682.     #t_nederlands    "Nederlands"
  1683.     #t_norsk    "Norsk"
  1684.     #t_polski    "Polski"
  1685.     #t_português    "Português"
  1686.     #t_russian    "Russian"
  1687.     #t_srpski    "Srpski"
  1688.     #t_suomi    "Suomi"
  1689.     #t_svenska    "Svenska"
  1690.     #t_ÃeÓtina    "ãeÓtina"
  1691. )
  1692.  
  1693.  
  1694. (set    #default 0)
  1695.  
  1696. (if (not (exists "User/Catalogs/dansk"))    (set #t_dansk ""))
  1697. (if (not (exists "User/Catalogs/deutsch"))    (set #t_deutsch ""))
  1698. (if (not (exists "User/Catalogs/español"))    (set #t_español ""))
  1699. (if (not (exists "User/Catalogs/français"))    (set #t_français ""))
  1700. (if (not (exists "User/Catalogs/greek"))    (set #t_greek ""))
  1701. (if (not (exists "User/Catalogs/hrvatski"))    (set #t_hrvatski ""))
  1702. (if (not (exists "User/Catalogs/íslenska"))    (set #t_íslenska ""))
  1703. (if (not (exists "User/Catalogs/italiano"))    (set #t_italiano ""))
  1704. (if (not (exists "User/Catalogs/magyar"))    (set #t_magyar ""))
  1705. (if (not (exists "User/Catalogs/nederlands"))    (set #t_nederlands ""))
  1706. (if (not (exists "User/Catalogs/norsk"))    (set #t_norsk ""))
  1707. (if (not (exists "User/Catalogs/polski"))    (set #t_polski ""))
  1708. (if (not (exists "User/Catalogs/português"))    (set #t_português ""))
  1709. (if (not (exists "User/Catalogs/russian"))    (set #t_russian ""))
  1710. (if (not (exists "User/Catalogs/srpski"))    (set #t_srpski ""))
  1711. (if (not (exists "User/Catalogs/suomi"))    (set #t_suomi ""))
  1712. (if (not (exists "User/Catalogs/svenska"))    (set #t_svenska ""))
  1713. (if (not (exists "User/Catalogs/ÃeÓtina"))    (set #t_ÃeÓtina ""))
  1714.  
  1715. (if (and (exists "LOCALE:Languages/dansk.language" (noreq)) (not (= #t_dansk "")))
  1716.     (set #default (bitor #default #dansk))
  1717. )
  1718. (if (and (exists "LOCALE:Languages/deutsch.language" (noreq)) (not (= #t_deutsch "")))
  1719.     (set #default (bitor #default #deutsch))
  1720. )
  1721. (if (and (exists "LOCALE:Languages/español.language" (noreq)) (not (= #t_español "")))
  1722.     (set #default (bitor #default #español))
  1723. )
  1724. (if (and (exists "LOCALE:Languages/français.language" (noreq)) (not (= #t_français "")))
  1725.     (set #default (bitor #default #français))
  1726. )
  1727. (if (and (exists "LOCALE:Languages/greek.language" (noreq)) (not (= #t_greek "")))
  1728.     (set #default (bitor #default #greek))
  1729. )
  1730. (if (and (exists "LOCALE:Languages/hrvatski.language" (noreq)) (not (= #t_hrvatski "")))
  1731.     (set #default (bitor #default #hrvatski))
  1732. )
  1733. (if (and (exists "LOCALE:Languages/íslenska.language" (noreq)) (not (= #t_íslenska "")))
  1734.     (set #default (bitor #default #íslenska))
  1735. )
  1736. (if (and (exists "LOCALE:Languages/italiano.language" (noreq)) (not (= #t_italiano "")))
  1737.     (set #default (bitor #default #italiano))
  1738. )
  1739. (if (and (exists "LOCALE:Languages/magyar.language" (noreq)) (not (= #t_magyar "")))
  1740.     (set #default (bitor #default #magyar))
  1741. )
  1742. (if (and (exists "LOCALE:Languages/nederlands.language" (noreq)) (not (= #t_nederlands "")))
  1743.     (set #default (bitor #default #nederlands))
  1744. )
  1745. (if (and (exists "LOCALE:Languages/norsk.language" (noreq)) (not (= #t_norsk "")))
  1746.     (set #default (bitor #default #norsk))
  1747. )
  1748. (if (and (exists "LOCALE:Languages/polski.language" (noreq)) (not (= #t_polski "")))
  1749.     (set #default (bitor #default #polski))
  1750. )
  1751. (if (and (exists "LOCALE:Languages/português.language" (noreq)) (not (= #t_portugues "")))
  1752.     (set #default (bitor #default #portugues))
  1753. )
  1754. (if (and (exists "LOCALE:Languages/russian.language" (noreq)) (not (= #t_russian"")))
  1755.     (set #default (bitor #default #russian))
  1756. )
  1757. (if (and (exists "LOCALE:Languages/srpski.language" (noreq)) (not (= #t_srpski "")))
  1758.     (set #default (bitor #default #srpski))
  1759. )
  1760. (if (and (exists "LOCALE:Languages/suomi.language" (noreq)) (not (= #t_suomi "")))
  1761.     (set #default (bitor #default #suomi))
  1762. )
  1763. (if (and (exists "LOCALE:Languages/svenska.language" (noreq)) (not (= #t_svenska "")))
  1764.     (set #default (bitor #default #svenska))
  1765. )
  1766. (if (and (exists "LOCALE:Languages/ÃeÓtina.language" (noreq)) (not (= #t_ÃeÓtina "")))
  1767.     (set #default (bitor #default #ÃeÓtina))
  1768. )
  1769.  
  1770. (if (bitand #parts (bitor #system #prefs))
  1771.     (if (= @user-level 0)
  1772.     (
  1773.         (set #languages #default)
  1774.     )
  1775.     ( ; Average or Expert
  1776.         (set #languages (askoptions
  1777.             (prompt #t_languages)
  1778.             (help (cat #t_languageshelp @askoptions-help))
  1779.             (choices #t_dansk #t_deutsch  #t_español #t_français
  1780.                      #t_greek #t_hrvatski #t_íslenska #t_italiano
  1781.                      #t_magyar #t_nederlands
  1782.                      #t_norsk #t_polski #t_português #t_russian #t_srpski
  1783.                      #t_suomi #t_svenska #t_ÃeÓtina)
  1784.             (default #default)
  1785.         ))
  1786.     ))
  1787. )
  1788.  
  1789.  
  1790. ;**
  1791. ;** Find out which drivers should be installed (if any)
  1792. ;**
  1793.  
  1794. (set    #default #filesave)
  1795. (set    #drivers 0)
  1796.  
  1797. (if (exists "Libs:concierto.library" (noreq))
  1798.     (set #default (bitor #default #concierto))
  1799. )
  1800. (if (exists "Libs:delfina.library" (noreq))
  1801.     (set #default (bitor #default #delfina))
  1802. )
  1803. (if (<> (database "graphics-mem") 0)            ; Test for not Draco...
  1804.     (set #default (bitor #default #paula))
  1805. )
  1806. (if (exists "Libs:maestix.library" (noreq))
  1807.     (set #default (bitor #default #maestropro))
  1808. )
  1809. (if (exists "Devs:melodyaudio.device" (noreq)) 
  1810.     (set #default (bitor #default #melody))
  1811. )
  1812. (if (exists "Devs:mel1200audio.device" (noreq)) 
  1813.     (set #default (bitor #default #melody1200))
  1814. )
  1815. (if (exists "Libs:prelude.library" (noreq))
  1816.     (set #default (bitor #default #prelude))
  1817. )
  1818.  
  1819. (if (exists "Libs:toccata.library" (noreq))
  1820.     ; Don't set if emulation library found!
  1821.     (if (< (bitand (getversion "Libs:toccata.library") 65535) 1000)
  1822.         (set #default (bitor #default #toccata))
  1823.     )
  1824. )
  1825. (if (exists "Devs:dad_audio.device" (noreq)) 
  1826.     (set #default (bitor #default #wavetools))
  1827. )
  1828.  
  1829. (complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
  1830.  
  1831. (if (bitand #parts #system)
  1832.     (if (= @user-level 0)
  1833.     (
  1834.         (set #drivers #default)
  1835.     )
  1836.     ( ; Average or Expert
  1837.         (set #drivers (askoptions
  1838.             (prompt #t_drivers)
  1839.             (help (cat #t_drivershelp @askoptions-help))
  1840.             (choices "Concierto" "Delfina" "Filesave" "Maestro Pro" "Melody Z2" "Melody 1200" "Paula" "Prelude" "Toccata" "Wavetools")
  1841.             (default #default)
  1842.         ))
  1843.     ))
  1844. )
  1845.  
  1846. ;**
  1847. ;**  Install 020-versions of the binaries?
  1848. ;**
  1849.  
  1850. (set #ver68k    "")
  1851. (set #default    1)
  1852.  
  1853. (if (patmatch "68000|68010" (database "cpu"))
  1854. (
  1855.     (set #default 0)
  1856. ))
  1857.  
  1858. (if (patmatch "68060" (database "cpu"))
  1859. (
  1860.     (set #default 2)
  1861. ))
  1862.  
  1863. (complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
  1864.  
  1865. (if (and (bitand #parts #system) (>= @user-level 1))
  1866.     (set #default (askchoice
  1867.         (prompt #t_CPUver)
  1868.         (help (cat #t_CPUverhelp @askbool-help))
  1869.         (choices "68000" "68020-68040" "68060")
  1870.         (default #default)))
  1871. )
  1872.  
  1873. (if (= #default 0)
  1874. (
  1875.     (set #ver68k ".000")
  1876. ))
  1877. (if (= #default 2)
  1878. (
  1879.     (set #ver68k ".060")
  1880. ))
  1881.  
  1882.  
  1883. ;**
  1884. ;** Find out which developer files should be installed
  1885. ;**
  1886.  
  1887. (set    #default (bitor #devdocs #source #asm #cgen #fd))
  1888. (set    #devfiles 0)
  1889.  
  1890. (if (exists "GG:" (noreq))
  1891.     (set #default (bitor #default #gg))
  1892. )
  1893.  
  1894. (if (exists "SC:" (noreq))
  1895.     (set #default (bitor #default #sas))
  1896. )
  1897.  
  1898. (if (exists "STORMC:" (noreq))
  1899.     (set #default (bitor #default #storm))
  1900. )
  1901.  
  1902. (if (exists "EMODULES:" (noreq))
  1903.     (set #default (bitor #default #e))
  1904. )
  1905.  
  1906. (complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
  1907.  
  1908. (if (bitand #parts (bitor #a-developer #d-developer))
  1909. (
  1910.     (if (= @user-level 0)
  1911.     (
  1912.         (set #devfiles #default)
  1913.     )
  1914.     ( ; Average or Expert
  1915.         (set #devfiles (askoptions
  1916.             (prompt #t_devfiles)
  1917.             (help (cat #t_devfileshelp @askoptions-help))
  1918.             (choices #t_devdocs #t_source #t_asm #t_cgen #t_e #t_fd #t_gg #t_sas #t_storm )
  1919.             (default #default)
  1920.         ))
  1921.     ))
  1922. ))
  1923.  
  1924. ;**
  1925. ;** Find out where the files should be installed
  1926. ;**
  1927.  
  1928. (set #devspath        "Devs:")
  1929. (set #cpath        "C:")
  1930. (set #prefspath        "SYS:Prefs/")
  1931. (set #lpath        "L:")
  1932. (set #localepath    "Locale:")
  1933.  
  1934. (set #incpath        @default-dest)
  1935. (set #ggincpath        "GG:include/")
  1936. (set #sasincpath    "Include:")
  1937. (set #stormincpath    "StormC:Include")
  1938. (set #fdpath        "FD:")
  1939. (set #emodpath        "EMODULES:")
  1940.  
  1941. (if (exists #devspath (noreq)) (set #devspath (expandpath #devspath)))
  1942. (if (exists #cpath (noreq)) (set #cpath (expandpath #cpath)))
  1943. (if (exists #prefspath (noreq)) (set #prefspath (expandpath #prefspath)))
  1944. (if (exists #lpath (noreq)) (set #lpath (expandpath #lpath)))
  1945. (if (exists #localepath (noreq)) (set #localepath (expandpath #localepath)))
  1946.  
  1947. (if (not (exists "Help:" (noreq)))
  1948. (
  1949.     (if (bitand #parts #prefs)
  1950.         (set #userdocpath #prefspath)
  1951.         (set #userdocpath @default-dest)
  1952.     )
  1953. )
  1954. (
  1955.     (if (>= #osversion 38)
  1956.     (
  1957.         (set #userdocpath "Help:")
  1958.     ))
  1959. ))
  1960.  
  1961. (if (bitand #devfiles #gg)
  1962. (
  1963.     (set #incpath "GG:os-include/")
  1964. ))
  1965. (if (exists "Include:" (noreq))
  1966. (
  1967.     (set #incpath "Include:")
  1968. ))
  1969.  
  1970. (if (= @user-level 0)
  1971. (
  1972.     (if (and (bitand #parts #system) (not (exists #devspath (noreq))))
  1973.     (
  1974.         (abort #t_nodevs)
  1975.     ))
  1976.     (if (and (bitand #parts #system) (not (exists #cpath (noreq))))
  1977.     (
  1978.         (abort #t_noc)
  1979.     ))
  1980.     (if (and (bitand #parts #prefs) (not (exists #prefspath (noreq))))
  1981.         (
  1982.         (abort #t_noprefs)
  1983.     ))
  1984.     (if (and (bitand #parts #audio) (not (exists #lpath (noreq))))
  1985.     (
  1986.         (abort #t_nol)
  1987.     ))
  1988.  
  1989.     (set #srcpath (tackon @default-dest "AHI/"))
  1990.     (if (exists #srcpath)
  1991.     (
  1992.         (delete #srcpath
  1993.             (all)
  1994.             (optional "force")
  1995.         )
  1996.     ))
  1997.  
  1998.     (set #devdocspath (tackon #srcpath "docs/"))
  1999.     (if (=     #userdocpath @default-dest)
  2000.     (
  2001.         (set #userdocpath #devdocspath)
  2002.     ))
  2003.     (if (= #incpath @default-dest)
  2004.     (
  2005.         (set #incpath (tackon #srcpath "include/"))
  2006.     ))
  2007.     (set #aincpath #incpath)
  2008.     (set #cincpath #incpath)
  2009.     (if (not (exists #sasincpath (noreq)))
  2010.     (
  2011.         (set #sasincpath #cincpath)
  2012.     ))
  2013.     (if (not (exists #stormincpath (noreq)))
  2014.     (
  2015.         (set #stormincpath #cincpath)
  2016.     ))
  2017.     (if (not (exists #fdpath (noreq)))
  2018.     (
  2019.         (set #fdpath (tackon #incpath "fd/"))
  2020.     ))
  2021.     (if (not (exists #emodpath (noreq)))
  2022.     (
  2023.         (set #emodpath #cincpath)
  2024.     ))
  2025.  
  2026.     (makedir #srcpath (infos))
  2027.     (set @default-dest #srcpath)
  2028.  
  2029. ; Match the number of completes in the 'else' section...
  2030.     (complete (/ #complete 10)) (set #complete (+ #complete (* 15 #completeadd)))
  2031.  
  2032. )
  2033. ( ; Average or Expert
  2034.  
  2035.     (complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
  2036.  
  2037.     (if (and (bitand #parts #system)
  2038.              (or (not (exists #devspath (noreq))) (= @user-level 2) ))
  2039.     (
  2040.         (set #devspath (askdir 
  2041.             (prompt #t_devspath)
  2042.             (help (cat #t_devspathhelp @askdir-help))
  2043.             (default #devspath)
  2044.         ))
  2045.     ))
  2046.  
  2047.     (complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
  2048.  
  2049.     (if (and (bitand #parts #system)
  2050.              (or (not (exists #cpath (noreq))) (= @user-level 2) ))
  2051.     (
  2052.         (set #cpath (askdir 
  2053.             (prompt #t_cpath)
  2054.             (help (cat #t_cpathhelp @askdir-help))
  2055.             (default #cpath)
  2056.         ))
  2057.     ))
  2058.  
  2059.     (complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
  2060.  
  2061.     (if (and (<> #languages 0)
  2062.              (or (not (exists #localepath (noreq))) (= @user-level 2) ))
  2063.     (
  2064.         (set #localepath (askdir 
  2065.             (prompt #t_localepath)
  2066.             (help (cat #t_localepathhelp @askdir-help))
  2067.             (default #localepath)
  2068.         ))
  2069.     ))
  2070.  
  2071.  
  2072.  
  2073.     (complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
  2074.  
  2075.     (if (and (bitand #parts #prefs)
  2076.              (or (not (exists #prefspath (noreq))) (= @user-level 2) ))
  2077.     (
  2078.         (set #prefspath (askdir 
  2079.             (prompt #t_prefspath)
  2080.             (help (cat #t_prefspathhelp @askdir-help))
  2081.             (default #prefspath)
  2082.         ))
  2083.     ))
  2084.  
  2085.     (complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
  2086.  
  2087.     (if (and (bitand #parts #audio)
  2088.              (or (not (exists #lpath (noreq))) (= @user-level 2) ))
  2089.     (
  2090.         (set #lpath (askdir 
  2091.             (prompt #t_lpath)
  2092.             (help (cat #t_lpathhelp @askdir-help))
  2093.             (default #lpath)
  2094.         ))
  2095.     ))
  2096.  
  2097.     (complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
  2098.  
  2099.     (if (and (bitand #parts #audio)
  2100.              (or (not (exists #dosdevpath (noreq))) (= @user-level 2) ))
  2101.     (
  2102.         (set #dosdevpath (askdir 
  2103.             (prompt #t_dosdevpath)
  2104.             (help (cat #t_dosdevpathhelp @askdir-help))
  2105.             (default #dosdevpath)
  2106.         ))
  2107.     ))
  2108.  
  2109.     (complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
  2110.  
  2111.     (if (and (bitand #parts #userdoc)
  2112.              (or (= #userdocpath @default-dest) (= @user-level 2) ))
  2113.     (
  2114.         (set #userdocpath (askdir 
  2115.             (prompt #t_userdocpath)
  2116.             (help (cat #t_userdocpathhelp @askdir-help))
  2117.             (default #userdocpath)
  2118.         ))
  2119.     ))
  2120.  
  2121.     (complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
  2122.  
  2123.     (if (bitand #devfiles #source)
  2124.     (
  2125.         (set #srcpath (askdir 
  2126.             (prompt #t_srcpath)
  2127.             (help (cat #t_srcpathhelp @askdir-help))
  2128.             (default @default-dest)
  2129.         ))
  2130.         (set #srcpath (tackon #srcpath "AHI/"))
  2131.         (if (exists #srcpath)
  2132.         (
  2133.             (delete #srcpath
  2134.                 (all)
  2135.                 (confirm average)
  2136.                 (optional "force")
  2137.                 (prompt #t_oldsrc)
  2138.                 (help #t_nohelp)
  2139.             )
  2140.         ))
  2141.         (makedir #srcpath (infos))
  2142.         (set @default-dest #srcpath)
  2143.     ))
  2144.  
  2145.     (complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
  2146.  
  2147.     (if (bitand #devfiles #devdocs)
  2148.     (
  2149.         (set #devdocspath (askdir 
  2150.             (prompt #t_devdocspath)
  2151.             (help (cat #t_devdocspathhelp @askdir-help))
  2152.             (default (tackon @default-dest "docs/"))
  2153.             (newpath)
  2154.         ))
  2155.     ))
  2156.  
  2157.     (complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
  2158.  
  2159.     (if (bitand #devfiles #asm)
  2160.     (
  2161.         (set #aincpath (askdir 
  2162.             (prompt #t_aincpath)
  2163.             (help (cat #t_aincpathhelp @askdir-help))
  2164.             (default #incpath)
  2165.         ))
  2166.  
  2167.     ))
  2168.  
  2169.     (complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
  2170.  
  2171.     (if (bitand #devfiles #fd)
  2172.     (
  2173.         (if (not (exists #fdpath (noreq)))
  2174.         (
  2175.             (set #fdpath (tackon #incpath "fd/"))
  2176.         ))
  2177.         (set #fdpath (askdir 
  2178.             (prompt #t_fdpath)
  2179.             (help (cat #t_fdpathhelp @askdir-help))
  2180.             (default #fdpath)
  2181.         ))
  2182.     ))
  2183.  
  2184.     (complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
  2185.  
  2186.     (if (bitand #devfiles #cgen)
  2187.     (
  2188.         (set #cincpath (askdir 
  2189.             (prompt #t_cincpath)
  2190.             (help (cat #t_cincpathhelp @askdir-help))
  2191.             (default #incpath)
  2192.         ))
  2193.     ))
  2194.  
  2195.     (complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
  2196.  
  2197.     (if (bitand #devfiles #e)
  2198.     (
  2199.         (set #emodpath (askdir 
  2200.             (prompt #t_emodpath)
  2201.             (help (cat #t_emodpathhelp @askdir-help))
  2202.             (default #emodpath)
  2203.         ))
  2204.     ))
  2205.  
  2206.     (complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
  2207.  
  2208.     (if (bitand #devfiles #gg)
  2209.     (
  2210.         (set #ggincpath (askdir 
  2211.             (prompt #t_ggincpath)
  2212.             (help (cat #t_ggincpathhelp @askdir-help))
  2213.             (default #ggincpath)
  2214.         ))
  2215.     ))
  2216.  
  2217.     (complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
  2218.  
  2219.     (if (bitand #devfiles #sas)
  2220.     (
  2221.         (set #sasincpath (askdir 
  2222.             (prompt #t_sasincpath)
  2223.             (help (cat #t_sasincpathhelp @askdir-help))
  2224.             (default #sasincpath)
  2225.         ))
  2226.     ))
  2227.  
  2228.     (complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
  2229.  
  2230.     (if (bitand #devfiles #storm)
  2231.     (
  2232.         (set #stormincpath (askdir 
  2233.             (prompt #t_stormincpath)
  2234.             (help (cat #t_stormincpathhelp @askdir-help))
  2235.             (default #stormincpath)
  2236.         ))
  2237.     ))
  2238. ))
  2239.  
  2240.  
  2241. ;******************************************************************************
  2242. ;**** Install *****************************************************************
  2243. ;******************************************************************************
  2244.  
  2245.  
  2246. ;**
  2247. ;** Install the prefs program
  2248. ;**
  2249.  
  2250. (complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
  2251. (if (bitand #parts #prefs)
  2252. (
  2253.  
  2254. ; No version checking, so user can change gui version
  2255.  
  2256.     (copyfiles
  2257.         (help (cat #t_prefspathhelp @copylib-help))
  2258.         (prompt #t_installing "AHI")
  2259.         (source (tackon "User/Prefs" #prefssrc))
  2260.         (dest #prefspath)
  2261.         (newname "AHI")
  2262.         (confirm)
  2263.     )
  2264.     (protect (tackon #prefspath "AHI") "+e")
  2265.  
  2266.  
  2267.     (if (= #icon #icon_std)
  2268.         (set #iconsrc "AHI.info")
  2269.     )
  2270.     (if (= #icon #icon_mwb)
  2271.         (set #iconsrc "AHI.MWB.info")
  2272.     )
  2273.  
  2274.     (copyfiles
  2275.         (help (cat #t_prefspathhelp @copylib-help))
  2276.         (prompt #t_installing "AHI")
  2277.         (source (tackon "User/Prefs" #iconsrc))
  2278.         (dest #prefspath)
  2279.         (newname "AHI.info")
  2280.         (confirm)
  2281.         (noposition)
  2282.     )
  2283.  
  2284.     (set @default-dest #prefspath)
  2285. ))
  2286.  
  2287. ;**
  2288. ;** Install the audio handler
  2289. ;**
  2290.  
  2291. (complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
  2292. (if (bitand #parts #audio)
  2293. (
  2294.     (copylib
  2295.         (help (cat #t_lpathhelp @copylib-help))
  2296.         (prompt #t_installing "AHI-Handler")
  2297.         (source "User/L/AHI-Handler")
  2298.         (dest #lpath)
  2299.         (confirm)
  2300.     )
  2301.     (protect (tackon #lpath "AHI-Handler") "+e")
  2302.  
  2303.     (copylib
  2304.         (help (cat #t_dosdevpathhelp @copylib-help))
  2305.         (prompt #t_installing "AUDIO")
  2306.         (source "User/Devs/DOSDrivers/AUDIO")
  2307.         (dest #dosdevpath)
  2308.         (confirm)
  2309.     )
  2310.  
  2311.     (if (= #icon #icon_std)
  2312.         (set #iconsrc "AUDIO.info")
  2313.     )
  2314.     (if (= #icon #icon_mwb)
  2315.         (set #iconsrc "AUDIO.MWB.info")
  2316.     )
  2317.  
  2318.     (copyfiles
  2319.         (help (cat #t_dosdevpathhelp @copylib-help))
  2320.         (prompt #t_installing "AUDIO")
  2321.         (source (tackon "User/Devs/DOSDrivers" #iconsrc))
  2322.         (dest #dosdevpath)
  2323.         (newname "AUDIO.info")
  2324.         (confirm)
  2325.         (noposition)
  2326.     )
  2327.  
  2328.     (set @default-dest #lpath)
  2329. ))
  2330.  
  2331. ;**
  2332. ;** Install the user documentation
  2333. ;**
  2334.  
  2335. (complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
  2336. (if (bitand #parts #userdoc)
  2337. (
  2338.     (copyfiles
  2339.         (help (cat #t_userdocpathhelp @copylib-help))
  2340.         (prompt #t_installing "ahi.guide")
  2341.         (source "User/Help/ahi.guide")
  2342.         (dest #userdocpath)
  2343.         (infos)
  2344.         (noposition)
  2345.     )
  2346.  
  2347.     (set @default-dest #userdocpath)
  2348. ))
  2349.  
  2350.  
  2351. ;**
  2352. ;** Install ahi.device, AddAudioModes and drivers
  2353. ;**
  2354.  
  2355. (complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
  2356. (if (bitand #parts #system)
  2357. (
  2358.  
  2359. ;** ahi.device
  2360.     (copylib
  2361.         (help (cat #t_ahidevhelp @copylib-help))
  2362.         (prompt (cat #t_installing "ahi.device" #ver68k))
  2363.         (source (cat "User/Devs/ahi.device" #ver68k))
  2364.         (dest #devspath)
  2365.         (newname "ahi.device")
  2366.         (confirm)
  2367.     )
  2368.  
  2369. ;** AddAudioModes
  2370.     (copylib
  2371.         (help (cat #t_cpathhelp @copylib-help))
  2372.         (prompt #t_installing "AddAudioModes")
  2373.         (source "User/C/AddAudioModes")
  2374.         (dest #cpath)
  2375.         (confirm)
  2376.     )
  2377.     (protect (tackon #cpath "AddAudioModes") "+e")
  2378.  
  2379. ;** Drivers
  2380.  
  2381.     (if (bitand #drivers #Concierto)
  2382.         (P_INSTDRIVER "concierto.audio" "CONCIERTO")
  2383.     )
  2384.     (if (bitand #drivers #delfina)
  2385.         (P_INSTDRIVER "delfina.audio" "DELFINA")
  2386.     )
  2387.     (if (bitand #drivers #filesave)
  2388.         (P_INSTDRIVER "filesave.audio" "FILESAVE")
  2389.     )
  2390.     (if (bitand #drivers #maestropro)
  2391.         (P_INSTDRIVER "maestropro.audio" "MAESTROPRO")
  2392.     )
  2393.     (if (bitand #drivers #melody)
  2394.         (P_INSTDRIVER "melody.audio" "MELODY")
  2395.     )
  2396.     (if (bitand #drivers #melody1200)
  2397.         (P_INSTDRIVER "melody1200.audio" "MELODY1200")
  2398.     )
  2399.     (if (bitand #drivers #paula)
  2400.         (P_INSTDRIVER "paula.audio" "PAULA")
  2401.     )
  2402.     (if (bitand #drivers #prelude)
  2403.         (P_INSTDRIVER "prelude.audio" "PRELUDE")
  2404.     )
  2405.     (if (bitand #drivers #toccata)
  2406.         (P_INSTDRIVER "toccata.audio" "TOCCATA")
  2407.     )
  2408.     (if (bitand #drivers #wavetools)
  2409.         (P_INSTDRIVER "wavetools.audio" "WAVETOOLS")
  2410.     )
  2411.  
  2412.     (run (cat (tackon #cpath "AddAudioModes") " REMOVE")
  2413.         (prompt #t_runaddmodes)
  2414.         (help #t_nohelp)
  2415.         (confirm)
  2416.     )
  2417.  
  2418.     (set @default-dest #devspath)
  2419. ))
  2420.  
  2421.  
  2422. ;**
  2423. ;** Install the catalogs
  2424. ;**
  2425.  
  2426. (complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
  2427. (if (bitand #parts (bitor #system #prefs))
  2428. (
  2429. ;** Catalogs
  2430.     (if (bitand #languages #dansk)
  2431.         (P_INSTCATALOG #t_dansk)
  2432.     )
  2433.     (if (bitand #languages #deutsch)
  2434.         (P_INSTCATALOG #t_deutsch)
  2435.     )
  2436.     (if (bitand #languages #español)
  2437.         (P_INSTCATALOG #t_español)
  2438.     )
  2439.     (if (bitand #languages #français)
  2440.         (P_INSTCATALOG #t_français)
  2441.     )
  2442.     (if (bitand #languages #greek)
  2443.         (P_INSTCATALOG #t_greek)
  2444.     )
  2445.     (if (bitand #languages #hrvatski)
  2446.         (P_INSTCATALOG #t_hrvatski)
  2447.     )
  2448.     (if (bitand #languages #íslenska)
  2449.         (P_INSTCATALOG #t_íslenska)
  2450.     )
  2451.     (if (bitand #languages #italiano)
  2452.         (P_INSTCATALOG #t_italiano)
  2453.     )
  2454.     (if (bitand #languages #magyar)
  2455.         (P_INSTCATALOG #t_magyar)
  2456.     )
  2457.     (if (bitand #languages #nederlands)
  2458.         (P_INSTCATALOG #t_nederlands)
  2459.     )
  2460.     (if (bitand #languages #norsk)
  2461.         (P_INSTCATALOG #t_norsk)
  2462.     )
  2463.     (if (bitand #languages #polski)
  2464.         (P_INSTCATALOG #t_polski)
  2465.     )
  2466.     (if (bitand #languages #português)
  2467.         (P_INSTCATALOG #t_português)
  2468.     )
  2469.     (if (bitand #languages #russian)
  2470.         (P_INSTCATALOG #t_russian)
  2471.     )
  2472.     (if (bitand #languages #srpski)
  2473.         (P_INSTCATALOG #t_srpski)
  2474.     )
  2475.     (if (bitand #languages #suomi)
  2476.         (P_INSTCATALOG #t_suomi)
  2477.     )
  2478.     (if (bitand #languages #svenska)
  2479.         (P_INSTCATALOG #t_svenska)
  2480.     )
  2481.     (if (bitand #languages #ÃeÓtina)
  2482.         (P_INSTCATALOG #t_ÃeÓtina)
  2483.     )
  2484. ))
  2485.  
  2486. ;**
  2487. ;** Install the autodocs
  2488. ;**
  2489.  
  2490. (complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
  2491. (if (bitand #devfiles #devdocs)
  2492. (
  2493.     (if (bitand #parts #a-developer)
  2494.         (set #pattern "~(#?sub#?)"))
  2495.  
  2496.     (if (bitand #parts #d-developer)
  2497.         (set #pattern "(#?sub#?)"))
  2498.  
  2499.     (if (and (bitand #parts #a-developer) (bitand #parts #d-developer))
  2500.         (set #pattern "#?"))
  2501.  
  2502.     (makedir #devdocspath)
  2503.     (copyfiles
  2504.         (help @copylib-help)
  2505.         (prompt #t_installingdocs )
  2506.         (source "Developer/docs/")
  2507.         (dest #devdocspath)
  2508.         (pattern #pattern)
  2509.         (confirm average)
  2510.         (infos)
  2511.         (noposition)
  2512.     )
  2513.  
  2514.     (set @default-dest #devdocspath)
  2515. ))
  2516.  
  2517. ;**
  2518. ;** Install the include files
  2519. ;**
  2520.  
  2521. (complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
  2522. (if (bitand #devfiles #fd)
  2523. (
  2524.     (copyfiles
  2525.         (help @copylib-help)
  2526.         (prompt #t_installingincs)
  2527.         (source "Developer/Include/FD")
  2528.         (dest #fdpath)
  2529.         (all)
  2530.     )
  2531.  
  2532.     (set @default-dest #fdpath)
  2533. ))
  2534.  
  2535. (complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
  2536. (if (bitand #devfiles #asm)
  2537. (
  2538.     (copyfiles
  2539.         (help @copylib-help)
  2540.         (prompt #t_installingincs)
  2541.         (source "Developer/include/Asm")
  2542.         (dest #aincpath)
  2543.         (all)
  2544.     )
  2545.     (set @default-dest #aincpath)
  2546. ))
  2547.  
  2548. (complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
  2549. (if (bitand #devfiles #cgen)
  2550. (
  2551.     (copyfiles
  2552.         (help @copylib-help)
  2553.         (prompt #t_installingincs)
  2554.         (source "Developer/Include/C")
  2555.         (dest #cincpath)
  2556.         (all)
  2557.     )
  2558.  
  2559.     (set @default-dest #cincpath)
  2560. ))
  2561.  
  2562. (complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
  2563. (if (bitand #devfiles #e)
  2564. (
  2565.     (copyfiles
  2566.         (help @copylib-help)
  2567.         (prompt #t_installingincs)
  2568.         (source "Developer/Include/E")
  2569.         (dest #emodpath)
  2570.         (all)
  2571.     )
  2572.  
  2573.     (set @default-dest #emodpath)
  2574. ))
  2575.  
  2576. (complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
  2577. (if (bitand #devfiles #gg)
  2578. (
  2579.     (copyfiles
  2580.         (help @copylib-help)
  2581.         (prompt #t_installingincs)
  2582.         (source "Developer/Include/GG")
  2583.         (dest #ggincpath)
  2584.         (all)
  2585.     )
  2586.  
  2587.     (set @default-dest #ggincpath)
  2588. ))
  2589.  
  2590. (complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
  2591. (if (bitand #devfiles #sas)
  2592. (
  2593.     (copyfiles
  2594.         (help @copylib-help)
  2595.         (prompt #t_installingincs)
  2596.         (source "Developer/Include/SAS")
  2597.         (dest #sasincpath)
  2598.         (all)
  2599.     )
  2600.  
  2601.     (set @default-dest #sasincpath)
  2602. ))
  2603.  
  2604. (complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
  2605. (if (bitand #devfiles #storm)
  2606. (
  2607.     (copyfiles
  2608.         (help @copylib-help)
  2609.         (prompt #t_installingincs)
  2610.         (source "Developer/Include/Storm")
  2611.         (dest #stormincpath)
  2612.         (all)
  2613.     )
  2614.  
  2615.     (set @default-dest #stormincpath)
  2616. ))
  2617.  
  2618. ;** 
  2619. ;** Install the examples
  2620. ;**
  2621.  
  2622. (complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
  2623. (if (bitand #devfiles #source)
  2624. (
  2625.     (if (bitand #parts #a-developer)
  2626.     (
  2627.         (makedir (tackon #srcpath "examples/"))
  2628.         (copyfiles
  2629.             (help @copylib-help)
  2630.             (prompt #t_installingsrc)
  2631.             (source "Developer/examples")
  2632.             (dest (tackon #srcpath "examples/"))
  2633.             (all)
  2634.         )
  2635.     ))
  2636.     (if (bitand #parts #d-developer)
  2637.     (
  2638.         (makedir (tackon #srcpath "drivers/"))
  2639.         (copyfiles
  2640.             (help @copylib-help)
  2641.             (prompt #t_installingsrc)
  2642.             (source "Developer/drivers")
  2643.             (dest (tackon #srcpath "drivers/"))
  2644.             (all)
  2645.         )
  2646.         (makedir (tackon #srcpath "support/"))
  2647.         (copyfiles
  2648.             (help @copylib-help)
  2649.             (prompt #t_installingsrc)
  2650.             (source "Developer/support")
  2651.             (dest (tackon #srcpath "support/"))
  2652.             (all)
  2653.         )
  2654.     ))
  2655.     (if (bitand #parts (bitor #a-developer #d-developer))
  2656.     (
  2657.         (copyfiles
  2658.             (help @copylib-help)
  2659.             (prompt #t_installingsrc)
  2660.             (source "")
  2661.             (dest #srcpath)
  2662.             (pattern "(COPYRIGHT|HISTORY|VERSION|ahi.readme)#?")
  2663.         )
  2664.     ))
  2665.  
  2666.     (set @default-dest #srcpath)
  2667. ))
  2668.  
  2669.  
  2670.  
  2671.  
  2672. (complete 100)
  2673. (exit)
  2674.